|
Фокус на "Нет" в стандартном MsgBox vbYesNo
|
|||
---|---|---|---|
#18+
Добрый день! Пока жду ответа уже наверное переделаю на рисованную форму, но всё же. Возможно ли поставить фокус на кнопку "Нет" в стандартном MsgBox vbYesNo? ... |
|||
:
Нравится:
Не нравится:
|
|||
17.06.2016, 10:37 |
|
Фокус на "Нет" в стандартном MsgBox vbYesNo
|
|||
---|---|---|---|
#18+
fatherboard, Dim Msg, Style, Title, Help, Ctxt, Response, MyString Msg = "Do you want to continue ?" ' Define message. Style = vbYesNo + vbCritical + vbDefaultButton2 ' Define buttons. Title = "MsgBox Demonstration" ' Define title. Help = "DEMO.HLP" ' Define Help file. Ctxt = 1000 ' Define topic ' context. ' Display message. Response = MsgBox(Msg, Style, Title, Help, Ctxt) If Response = vbYes Then ' User chose Yes. MyString = "Yes" ' Perform some action. Else ' User chose No. MyString = "No" ' Perform some action. End If ... |
|||
:
Нравится:
Не нравится:
|
|||
17.06.2016, 10:49 |
|
|
start [/forum/topic.php?fid=45&gotonew=1&tid=1613457]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
39ms |
get topic data: |
10ms |
get first new msg: |
8ms |
get forum data: |
2ms |
get page messages: |
42ms |
get tp. blocked users: |
1ms |
others: | 11ms |
total: | 145ms |
0 / 0 |