68.txt

介绍VB里的各种控件的使用方法,窗口控制,图像编程以及OCX等内容,还提供了一个API集供参考.

在图片上平滑移动文字 
在很多电影及游戏的结尾，你可以看到文本在图片上平滑地卷到屏幕的上方（如电
影的版权声明等），在 VB 中，可以使用以下步骤及方法实现此“特技”： 
　 
1、新建一工程文件，缺省创建 Form1； 
2、在 Form1 上放置 Picture Box 控件 Picture1，选择背景图片； 
3、选择 Picture1（即以它为一个容器），在上面放置 Label 控件 Label1，设置 
Label1 的 BorderStyle 属性为 0（透明——即在控件后的背景色和任何图片都是
可见的），设置 Caption 为待移动的字符串； 
4、在 Form1 上放置 Timer 控件 Timer1，设置 Enabled 属性为 True，设置 
Interval 为 100,在 Timer1 的 Timer 事件中加入以下程序： 
iStep=20 
Label1.Top=Label1.Top - iStep 
Interval 决定图形移动速度；iStep 决定图形移动的平滑程度。 
5、在 Form_Load 事件中加入以下程序： face="宋体">Lable1.Top = Picture1.
ScaleHeight 
　 
到此，你就可以实现文字在图形上的平滑移动。本例产生的效果是由下向上移动，
如果你将程序稍加改变，就可以实现由下到上，由左到右，由右到左等“特技”效
果。