|
|
发表于 2010-2-6 10:06:01
|
显示全部楼层
来自： 中国广东广州
窗体代码中申明" Y1 U2 B! ^) g. f* ]9 U" ]: e' @. G
Declare 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 Long7 E3 W4 D8 s, y1 |
/ }" z* K& a# a7 ]# h5 S4 G
Private Sub Form_Load(): f& C/ b$ D& U1 D2 L
'最小化) S2 c- {& m/ |. U5 U: Z
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 0
7 ~; P; j! p! L& i; p. H'窗体至顶
/ l0 J2 P, O" q& D! HSetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 3
. d$ _+ W# i& W! n( @End Sub |
评分
-
查看全部评分
|
