|
|
发表于 2010-2-6 10:06:01
|
显示全部楼层
来自： 中国广东广州
窗体代码中申明
' c; x+ @0 L& h" W: lDeclare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long# H& V& }3 g7 [! z$ @5 c
6 N0 }% H- G! i* m% x2 a4 WPrivate Sub Form_Load()6 S* e/ b8 J/ b% W! P
'最小化! g2 m9 N1 q) ~7 u; c
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 0 P* }+ A6 }! E7 Y1 f
'窗体至顶; r0 V! Z4 {: c; G& Q
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 3
2 z" c+ m S9 `& g9 B4 ?7 X$ CEnd Sub |
评分
-
查看全部评分
|
