|
|
发表于 2010-2-6 10:06:01
|
显示全部楼层
来自： 中国广东广州
窗体代码中申明% a$ y8 |- o- N/ O
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 Long
* C, T [( A9 H1 y5 C9 d1 c0 E' z
Private Sub Form_Load()
9 @$ U* \( n3 x* M'最小化2 ^+ \6 Z; D3 S0 h$ N
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 0$ t9 H+ o6 ?3 L: W9 E; D' U
'窗体至顶' a2 j: Q* b8 T( ^
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 3! \0 B6 N2 `' P4 e( g2 z) t
End Sub |
评分
-
查看全部评分
|
