|
|
发表于 2010-2-6 10:06:01
|
显示全部楼层
来自: 中国广东广州
窗体代码中申明
6 Q/ K& L* _7 I0 P4 B# r# wDeclare 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
9 h G) v; M' N; T9 i5 A- I2 V9 r$ F4 B* ?8 A
Private Sub Form_Load()
7 d4 b# X# W1 e {' @: d'最小化% c; \4 @% }% E( S3 ]6 d
SetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 0
0 ^' f9 p, A, m( h. ]'窗体至顶
8 u5 L. }8 N9 i* c3 p# ISetWindowPos Me.hwnd, -1, 0, 0, 0, 0, 3
o) C$ K9 \! I/ J. d. h! MEnd Sub |
评分
-
查看全部评分
|