Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: Модули Добавлено: 18.04.10 21:14  

Автор вопроса:  VbStarter | Web-сайт: moscowdevils.ru | ICQ: 357911808 
как вызвать модуль из Sub'a

Ответить

  Ответы Всего ответов: 22  

Номер ответа: 1
Автор ответа:
 



Администратор

ICQ: 278109632 

Вопросов: 42
Ответов: 3949
 Web-сайт: domkratt.com
 Профиль | | #1
Добавлено: 18.04.10 21:36
Ты сам понял, что сказал?

Ответить

Номер ответа: 2
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #2
Добавлено: 18.04.10 21:44
да. (как можно вызвать процедуру Timer1_Timer() в модуле AntiPrtScr из процедуры в форме) Executioner, будь проще:)

Ответить

Номер ответа: 3
Автор ответа:
 AWP



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
 Web-сайт: xawp.narod.ru
 Профиль | | #3
Добавлено: 18.04.10 21:51
"процедуру Timer1_Timer() в модуле AntiPrtScr"
Это как?

Допустим, процедура Timer1_Timer в форме, а не в модуле.
И тогда я могу предположить, что все наоборот, и тебе нужно из Модуля вызвать Timer1_Timer? rjnjhfz yf[jlbncz d ajhvt/

Ответить

Номер ответа: 4
Автор ответа:
 AWP



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
 Web-сайт: xawp.narod.ru
 Профиль | | #4
Добавлено: 18.04.10 21:53
Пунто свитчер в руки.

Ответить

Номер ответа: 5
Автор ответа:
 



Администратор

ICQ: 278109632 

Вопросов: 42
Ответов: 3949
 Web-сайт: domkratt.com
 Профиль | | #5
Добавлено: 18.04.10 21:54
VbStarter, ты просто не умеешь выражаться по-русски.

Ответить

Номер ответа: 6
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #6
Добавлено: 18.04.10 21:54
мне нужно выполнить код модуля.

Ответить

Номер ответа: 7
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #7
Добавлено: 18.04.10 21:56
Executioner ты угадал я реально думаю по английски (и иногда проще на английском сказать) - не даром я на олимпиаде1 по району 2 по округу и 3 по городу

Ответить

Номер ответа: 8
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #8
Добавлено: 18.04.10 22:18
1. Не обижай одминов! :D
2.
е даром я на олимпиаде1 по району 2 по округу и 3 по городу

Хорошо. Вот это хорошо.
3. Модуль - это когда раста щелкает два раза по форме, или по модулю VB, и открывается такой текст, в нем процедурки и функции, вот они все вместе и называются модулем. А то, что ты имеешь ввиду - функция, процедура, подпрограмма, кусочек, ботва, вася, но никак не модуль.
4. Вот значет, что касается твоей проблемы - я так понял, ты из левой формы, левого модуля и вообще нигер знает откуда хочешь вызывать
  1.  
  2. Private Sub Timer1_Timer()
  3. ...


правильно? Тогда чоткие патцаны делают так:
  1.  
  2. Public Sub Timer1_Timer()
  3. ...

.
Вот. Можно подобрать свои семки и вызвать функцию:
  1.  
  2. Form1.Timer1_Timer


Смекаешь, раста?

Ответить

Номер ответа: 9
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #9
Добавлено: 18.04.10 22:45
  1. Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
  2. 'Ôóíêöèÿ GetAsyncKeyState îòëàâëèâàåò íàæàòèÿ íà êëàâèàòóðó âíå âàøåé ïðîãè
  3.  
  4. Private Sub Timer1_Timer()
  5. If GetAsyncKeyState(44) Then 'Åñëè íàæàëè ïðèíò ñêðèí, òî
  6.    Clipboard.Clear           'Î÷èùàåì áóôåð îáìåíà!
  7.    MsgBox "È íå ïûòàéñÿ äàâèòü íà ïðèíò ñêðèí ÎÊ?"     'Ðàñêîììåíòèðóéòå, åñëè õîòèòå!
  8. End If
  9. End Sub


вот такой код в модуле vb6. (модуль - обычный не класс модуль. модуль в кнопке Add

Ответить

Номер ответа: 10
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #10
Добавлено: 18.04.10 22:47
нужно вызвать (запустить)
  1. Private Sub Timer1_Timer()

Ответить

Номер ответа: 11
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #11
Добавлено: 18.04.10 22:48
из Form_Load'a в форме

Ответить

Номер ответа: 12
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #12
Добавлено: 18.04.10 22:52
модуль в кнопке Add
ааааа ты щас моцк всем порвеш. Модуль не бывает в кнопке. В кнопке бывает подпрограмма. Модуль - это сплошной код, состоящий из нескольких процедур, его нельзя запустить. Можно запустить одну из его процедур. Разделяй эти понятия.

VbStarter пишет:
из Form_Load'a в форме

1. Убери Private - это означает, что твоя процедура видна только внутри модуля. Если уберешь - будет видна во всей программе.
Вместо
  1.  
  2. Private Sub Timer1_Timer()


пиши просто
  1.  
  2. Sub Timer1_Timer()


а в Form_Load
  1.  
  2. Timer1_Timer


VB сам найдет, в каком модуле Timer1_Timer

Ответить

Номер ответа: 13
Автор ответа:
 VbStarter



ICQ: 357911808 

Вопросов: 118
Ответов: 1340
 Web-сайт: moscowdevils.ru
 Профиль | | #13
Добавлено: 18.04.10 23:16
мозгорвацы

Ответить

Номер ответа: 14
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #14
Добавлено: 19.04.10 02:05
Респект железному VBD)

Ответить

Номер ответа: 15
Автор ответа:
 



Администратор

ICQ: 278109632 

Вопросов: 42
Ответов: 3949
 Web-сайт: domkratt.com
 Профиль | | #15
Добавлено: 19.04.10 08:15
Да, я после первого поста не выдержал. А в старые добрые.... Эх, портит людей возраст =)

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам