在VB中实现窗体的动态效果

在VB中实现窗体的动态效果
http://www.tongyi.net  作者:姜卫东、华云  出处:中国电脑教育报    点击:1161  


   在VB编程中,应用程序窗体的出现和关闭一般都是静态的,不过,我们利用下面的一个API函数AnimateWindow就可以轻松实现窗体的动态效果。
   API函数AnimateWindow的声明如下:
   Private Declare Function AnimateWindow Lib "user32" (ByVal hwnd As Long, ByVal dwTime As Long, ByVal dwFlags As Long) As Long
   其中:hwnd只对form有效;dwtime是动画持续的时间,默认值为200;dwflags是动画方式,可以取&&H1、&&H2、&&H4、&&H5、&&H6、&&H8、&&H9和&&H10共8 个值,分别代表左右、右左、上下、左上到右下、右上到左下、下上、左下到右上以及中间到四周等。
   AW_HIDE = &&H10000 在窗体卸载时若想使用本函数就得加上此常量
   AW_ACTIVATE = &&H20000 在窗体通过本函数打开后,默认情况下会失去焦点,除非加上本常量
   AW_SLIDE = &&H40000
   AW_BLEND = &&H80000 淡入淡出效果(适用于WIN2000)
   下面,我们举一个例子让朋友们熟习AnimateWindow函数的使用。
   例:从左上角到右下角逐渐显示窗体
   Private Sub Form_Load()
   AnimateWindow hwnd, 3000, &&H5
   Form1.Refresh
   End Sub
   以上程序在PWIN98,VB6.0中文企业版中运行通过。
 

  • 0
    点赞
  • 1
    收藏
  • 打赏
    打赏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
©️2022 CSDN 皮肤主题:大白 设计师:CSDN官方博客 返回首页
评论

打赏作者

gnuljf

你的鼓励将是我创作的最大动力

¥2 ¥4 ¥6 ¥10 ¥20
输入1-500的整数
余额支付 (余额:-- )
扫码支付
扫码支付:¥2
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值