|
事情是这样的:我是一个vb爱好者,在学校里学了一点vb,计算机二级我也考了,但是我都不敢说我会vb!!因为我感觉我会的就是皮毛而已,昨天看到一段代码(下边的)竟然什么都看不懂!比如哪个lib "user32" 是啥啊?一句也不明白!。请高人们指点一下我现在应该看哪方面的书啊??太迷茫了
Private Declare Function AnimateWindow _
Lib "user32" _
( _
ByVal hWnd As Long, _
ByVal dwTime As Long, _
ByVal dwFlags As Long _
) As Long
Private Const AW_HOR_POSITIVE = &H1
Private Const AW_HOR_NEGATIVE = &H2
Private Const AW_VER_POSITIVE = &H4
Private Const AW_VER_NEGATIVE = &H8
Private Const AW_CENTER = &H10
Private Const AW_HIDE = &H10000
Private Const AW_ACTIVATE = &H20000
Private Const AW_SLIDE = &H40000
Private Const AW_BLEND = &H80000
Private Sub Form_Load()
AnimateWindow Me.hWnd, 10000, AW_BLEND Or AW_ACTIVATE
'还可以使用前面定义的其他常量显示不同的动画效果
Form1.Refresh
End Sub |
|