home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Tool Box
/
SIMS_2.iso
/
vb_code1
/
mhelp
/
mhelp.frm
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1992-01-29
|
2KB
|
55 lines
Form1
Demo for MHELP.VBX
Form1
OKButton
List1
OKButton_Click
ButtonhWnd
MhCtrlHwnd
OkButton
List1
Form_Click
@ Form_Load
StringSeg
SStringOffset
SegHex
OffHex
StringOffset
PeekResult-
MhPeekByte8
AddItme
MhPokeByteK
Form1
LongResult
SSegAddr
SSegAdd
TestVal
IntSeg
VarSeg
IntOff
VarPtr
Result
VarSegPtr
Form_Load
Demonstrate MhCtrlHwndc
The hWnd for the 'OK' button is"
Getting a string's address
This is a string
Lin$ = "
The segmented address for Lin$ is
Using single call, same value is
Get address again, in case moveda
Demonstrate PEEK and POKE
Peek result from first char of string is "
Using MhPokeByte, changed first char of Lin$ to
Lin$ = "
Get address for non-string variable
The segmented address for TestVal% is
Using single call, same value is
INP and OUT
*** Following code is Rem'd so does not execute
Result% = Inp(&H21)
' Interrupt mask
Out &H21, Result%1
OKButton_Click