http://user.qzone.qq.com/502792940?ptlang=2052&ADUIN=467288218&ADSESSION=1279803493&ADTAG=CLIENT.QQ.2881_FriendTip_QzoneFolder.0 默林现有动作 扬帆破浪 发表于2010年07月22日 20:30 阅读(2) 评论(0) 分类： 个人日记 来源：QQ客户端 举报 play("xxx");的方式 Acknowledge //点头表示答谢（可用） Alert //警惕（可用

这是一个向下后上的窗口，很好的！像瑞星一样的水窗口,自动退出小窗口.有一个水流动画(VB)

Option Explicit '函数声明 Private Declare Function GetPixel Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, _ ByVal Y As Long) As Long Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, _ ByVal hRgn As Long, ByVal bRedraw As Boolea