|
|
|
Собственное диалоговое окно
|
|||
|---|---|---|---|
|
#18+
Когда интерпритатор (или компилятор) выполняет код: 1 Dim answer As VbMsgBoxResult 2 ... 3 answer = MsgBox("Вы хотите сохранить файл?", _ vbQuestion + vbYesNoCancel, "файл-то сохранять надо?") 4 If answer = vbYes Then 5 ... 6 Else 7 ... 8 End If То в строке он останавливает выполнение программы и ждёт, когда пользователь нажмёт соответствующую кнопку. Потом продолжает выполнение программы в зависимости от ответа пользователя. Как мне сделать собственное диалоговое окно, которое выполняется в таком же духе: выполнение главной формы замораживается, пока не будет дан ответ, и потом главная форма обрабатывает этот ответ. (me.enabled = false - это не в тему. Я хочу, что бы посреди процедуры/функции работа проги замораживалась) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.09.2006, 17:25 |
|
||
|
Собственное диалоговое окно
|
|||
|---|---|---|---|
|
#18+
Ну, например вот так . ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.09.2006, 17:44 |
|
||
|
|

start [/forum/topic.php?fid=60&msg=34020006&tid=2165248]: |
0ms |
get settings: |
8ms |
get forum list: |
13ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
50ms |
get topic data: |
12ms |
get forum data: |
2ms |
get page messages: |
44ms |
get tp. blocked users: |
1ms |
| others: | 267ms |
| total: | 403ms |

| 0 / 0 |
