在VB中实现窗体的动态效果
来源:互联网 发布:js object to json 编辑:程序博客网 时间:2024/05/05 05:23
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中文企业版中运行通过。
- 在VB中实现窗体的动态效果
- 在VB中实现窗体的动态效果
- 有关vb 在 xp 下实现 窗体的磨砂效果。
- VB中在窗体上动态生成控件的代码。
- 窗体动态效果的实现
- 窗体动态效果的实现
- 窗体动态效果的实现
- 窗体动态效果的实现
- VB.Net实现QQ窗体浮动效果的方法
- vb.net实现类似QQ窗体的浮动效果
- 窗体的动态效果
- 在VB.NET中怎么实现多窗体同步
- 在VB.NET中怎么实现多窗体同步(1)
- 如何用VB在窗体中实现闪烁文字
- 在VB.NET中实现多窗体同步的完整解决方案
- VB挖空窗体,实现悬浮控件效果
- [VB.NET]VB.NET2005中怎样实现子窗体控制父窗体的控件属性?
- MFC窗体滑动、缩放、渐变动态效果的实现
- Ajax Hacks-Hack 10. 使用CSS文件产生格式化的信息
- *** Web 存储系统窗体:窗体注册表 (new)***
- Ajax Hacks-hack9 深入了解HTTP Response
- 用VB实现屏幕阴暗操作
- Ajax Hacks-hack8 处理Request Object 的错误
- 在VB中实现窗体的动态效果
- Ajax Hacks-hack7接收JSON格式的数据
- 利用VB控制窗口显示风格
- Ajax Hacks-Hack6 接收数字数据
- 用VB设计VCD播放器
- Ajax Hacks-Hack 5.取得普通字符串
- 在 VB 中 引 用 .dbf 及 索 引 文 件
- AJAX Hacks之Hack 4. 接收XML格式的数据
- VB6.0使用ADO对象连接数据库: