| Вопрос: как посчитать количество нажатий на кнопку? | Добавлено: 06.03.07 19:57 |
Автор вопроса:  Uksus | ICQ: 407373902 |
|
я уже где то видел что можно считать кол во нажатий на БАТОН а где видел не вспомню т.к. перелопатил около 200 страниц в инете!
Народ ПАМАГИТЕ КТО ЧЕМ МАГЁТ! |
| Ответы | Всего ответов: 39 |
|
Номер ответа: 1 Автор ответа:  EROS Вопросов: 58 Ответов: 4255  |
Профиль | | #1 | Добавлено: 06.03.07 20:18 |
|
как посчитать количество нажатий на кнопку?
Один, Два, Три, Четыре... ну и дальше по аналогии.. 
|
||
|
Номер ответа: 2 Автор ответа: D o c a l  ICQ: 408802757 Вопросов: 76 Ответов: 985 |
Web-сайт: Профиль | | #2 | Добавлено: 06.03.07 20:27 |
|
Здесь твоя кнопка
Private Sub Command1_Click()
dim a as integer a=a+1 End Sub нажимаеш на вторую узнаеш сколько раз нажимали первую Private Sub Command1_Click()
msgbox "Ти нажал на кнопку:"+format 
a=0 End Sub а можеш не обнулять  oc
|
||
|
Номер ответа: 3 Автор ответа: D o c a l ICQ: 408802757 Вопросов: 76 Ответов: 985 |
Web-сайт: Профиль | | #3 | Добавлено: 06.03.07 20:29 |
|
А МОЖЕШ НАПИСАТЬ У ПЕРВУЮ
LABEL1.CAPTION=A І СРАЗУ БУДЕШ ВИДЕТЬ СКОЛЬКО РАЗ НАЖАТА oc
|
||
|
Номер ответа: 4 Автор ответа: БоцманICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | | #4 | Добавлено: 06.03.07 20:30 |
|
перелопатил около 200 страниц в инете!
А подумать не пробовал, ведь дешевле будет? например
Private Sub Command1_Click()
Form1.Caption = Form1.Caption + 1 End Sub Private Sub Form_Load() Form1.Caption = 0 End Sub |
||
|
Номер ответа: 5 Автор ответа: D o c a l ICQ: 408802757 Вопросов: 76 Ответов: 985 |
Web-сайт: Профиль | | #5 | Добавлено: 06.03.07 20:35 |
| Eros мож подумать ти сел за комп і сразу знал Vb. | ||
|
Номер ответа: 6 Автор ответа: D o c a l ICQ: 408802757 Вопросов: 76 Ответов: 985 |
Web-сайт: Профиль | | #6 | Добавлено: 06.03.07 20:36 |
|
Бл*н забил:
oc-отето
|
||
|
Номер ответа: 7 Автор ответа: EROSВопросов: 58 Ответов: 4255 |
Профиль | | #7 | Добавлено: 06.03.07 23:18 |
|
Docal, да я родился со знанием VB! )))
А тебе не мешало бы прежде чем давать советы и примеры убедиться в их работоспособности.. Я не думаю, что твой код из поста №2 будет работать.. |
||
|
Номер ответа: 8 Автор ответа: ArtyomРазработчик Вопросов: 130 Ответов: 6602 |
Профиль | | #8 | Добавлено: 07.03.07 04:23 |
|
Сразу после рождения я знал VB6, VBA, SQL, VB .NET, HTML, CSS и еще много много крутых вещей.
В школе я не ходил на уроки потому что уже в первом классе знал полный материал курса 1 класса. Так что завидуйте мне все! |
||
|
Номер ответа: 9 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #9 | Добавлено: 07.03.07 05:55 |
|
Удивил. Я в первом классе знал весь школьный курс
Private Sub Command1_Click()
dim a as integer a=a+1 End Sub Для того, чтобы это правильно работало, надо объявить a как static |
||
|
Номер ответа: 10 Автор ответа: BonapartICQ: 175256 Вопросов: 32 Ответов: 108 |
Web-сайт: Профиль | | #10 | Добавлено: 07.03.07 07:29 |
|
Нет
Public a as long в (general)(declaration) или менять сам текст Private Sub Command1_Click() command1.caption=command1.caption+1 End Sub |
||
|
Номер ответа: 11 Автор ответа: EROSВопросов: 58 Ответов: 4255 |
Профиль | | #11 | Добавлено: 07.03.07 08:05 |
|
Для того, чтобы это правильно работало, надо объявить a как static
Sharp, ну вот взял и подсказал!
|
||
|
Номер ответа: 12 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #12 | Добавлено: 07.03.07 09:30 |
|
У.. какие интересные вопросы у нас на форуме
|
||
|
Номер ответа: 13 Автор ответа: Uksus ICQ: 407373902 Вопросов: 10 Ответов: 23 |
Профиль | | #13 | Добавлено: 07.03.07 10:22 |
|
Спасиб ребят Просто после десяти дней сидения за компом я бы вам и не ответил сразу скока будет 2+2...
2Haker Вопрос может быть и прост как 2+2 зато как развил тему аж на 12 постов А главное скока СПОРОВ |
||
|
Номер ответа: 14 Автор ответа: Black BerillВопросов: 17 Ответов: 151 |
Профиль | | #14 | Добавлено: 07.03.07 18:50 |
|
Ого, ожесточенная полемика
|
||
|
Номер ответа: 15 Автор ответа: DjonВопросов: 61 Ответов: 471 |
Web-сайт: Профиль | | #15 | Добавлено: 07.03.07 20:28 |
|
А ещё можно записывать в файл или в ресурс.
)
|
||