文档介绍:第四章窗体的设计
,窗体的属性
■tt
Caption
决定■仔厢杆屮显示的文弘
Mil* Burton 印 MinBurton
決定18体的量大化或• bftKHi足否有效
ConcrolBox
决定是否整示宙体的单哥杯与状念疫制佞15
BorderSlyk
tx*W疋希捉貳标栏、是否可以调整犬可、刀
BxkColor
isve体的背&翼色
Picture
设童瞪体的渭农馬片
Icon
设童控制栗单的图标
Height 和 Wdlh
isvarn的人小
Left Top
根据驚暮的左上角•定由体的21T
决J2宙体51否苻任务岸中观示
MoveabSc
决宦宙体是古可以®动
Visible
茯定I?体在因中运行时是否町见
WindowSuie
•大化、・4、化康丁鬲人小
豪 42 Boroc<Siy«e Hf3取01
说礬
ONi>ne
18体尢边IK与标&、.建议尽•彳' 旻歿用这种宙你
1-Fixed Single
■小化与・人化按ta・不虢耳形人
这圮攻认(■均可凋 e
2-Sizable
3-Fixed Dialog
刃体可杪功,但不靛為0人水
4-Fi<ed TbolWindowt
冇标&:无it小化与■大 化按钮,不feiwe大:h
S-Sirable ToolWiodnw's
Mousedown、mouseup > mousemove > click、dblclick
1, click事件与dblclick事件
Private sub form_click() Private sub form_dblclick()
End sub
End sub
双击则两个事件都执行
2, mousedown> mouseup> mousemove 事件
Private sub form_down (butten as integer, shift as integer,x as single ,y as single)
End sub
Private sub form_mouseup(butten as integer,shift as integer,x as single,y as single)
End sub
Private sub form_move(button as integer, shift as integer ,x as single ,y as single)
End sub
Button返回值和对应操作:1对应左键;2对应右键;4对应中键
Shift返回值和对应操作:1对shift ; 2对应Ctrl ; 4对应alt
例子:识别用户所按的键
Private sub form_mousedown(butten as integer, shift as
integer,x as single,y as single)
Select case button
Case 1
Form "您按下的是左键"
Case 2
Form “您按下的是右键"
End select
End sub
例子:探测鼠标的位置
*■性设■
窗体 Caption 愧対載标的位覽
文本惟 名称 1e*Movc
T«x< ■空
Private sub form_mousemove(button as integer, shift as integer, x as single ,y as single)
Text 1 .text二” x=”&x&” ” &”y=”&y
Keydown > keyup、keyclick
1, keyclick 事件
Private sub form_keypress(keyascii as integer)
End sub
Keyascii返回按键的ASCII码
例子;显示所按键的ASCII码
Priviate sub form_keypress(keyascii as integer)
Print “所按的键的ASCII码值为:”&keyascii
End sub
m
asciiw
■
ASCH M
Back Space < )
8
45
Tab
9
“
E.«n (N•:・》
13