home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
i
/
ivb92b.zip
/
WINEND.FRM
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1992-09-09
|
3KB
|
76 lines
Form1
Exit Windows
wwwwp
wwwww
Form1
Form_Click
ExitWindows
dwReservedq
wReturnCode
EW_REBOOTSYSTEM
EW_RESTARTWINDOWS
Form_Resize
Form1
WindowState
Form_Load
State8
Form1_Click
State1
EW_EXITWINDOWSg
value
level
react
resize
events
based
which
event
occurs
fails
whatever
reason
displaying
EW_CURRENTEXITTYPE
demonstration
program
Userw
Return to DOSu
Reboot computer
Exit to DOS & restart WindowsR
Keep track of why Resize event
is being triggered.e
We set the EW_CURRENTEXITTYPE constant
to the type of exit we want for this
demonstration program.
Form_Click
Mark that program is in Click eventa
Minimize WinEnd'
MsgBox "Windows Reboot aborted by an application.", 16, "Message from WinEnd"
Reset program since it was aborted
Form_Resize
The Form_Resize event procedure
uses the form level variable State%
to let it react to resize eventse
based on the point at which the
resize event occurs.
State%'s
Purpose
Value
Used to ignore initial
resize event when program
launched.
Used to activate Form_Click
event when you want to exit
windows. WinEnd resets
State% to 2 if the exit
fails (for whatever
reason).o
Used while trying to shutc
down Windows to avoid
displaying the WinEnd form.
After FORM_LOADC
After activatedC
During FORM_CLICKE
Form_Load
Minimize the formn