|
|
|
Про massagebox
|
|||
|---|---|---|---|
|
#18+
Люди в VisualBasic PrivateSubCommand_Click() If MsgBox("Вы уверены?",vbYesNo,"","",0)=vbNo Then Action=vbDataActionCancel ExitSub Else End & выход из форума End if End End Sub FoxPro MESSAGEBOX(cMessageText [, nDialogBoxType [, cTitleBarText]]) нашел и все что к чему зделайте плз помогите ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2011, 10:26 |
|
||
|
Про massagebox
|
|||
|---|---|---|---|
|
#18+
eMessageTitle = 'My Application' eMessageText = 'Âû õîòèòå âûòè?' nDialogType = 4 + 32 + 256 * 4 = Yes and No buttons * 16 = Stop sign icon * 256 = Second button is default nAnswer = MESSAGEBOX(eMessageText, nDialogType, eMessageTitle) DO CASE CASE nAnswer = 6 THISFORM.RELEASE CASE nAnswer = 7 WAIT WINDOW 'You chose No' ENDCASE нашел и еще кто ищет ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 08.12.2011, 11:10 |
|
||
|
|
start [/forum/topic.php?fid=41&tid=1583952]: |
0ms |
get settings: |
11ms |
get forum list: |
17ms |
check forum access: |
5ms |
check topic access: |
5ms |
track hit: |
169ms |
get topic data: |
12ms |
get forum data: |
3ms |
get page messages: |
35ms |
get tp. blocked users: |
1ms |
| others: | 237ms |
| total: | 495ms |
| 0 / 0 |
