在大学作毕业设计的课题是编制一个教学软件,所以很自然地和VB这种易学、易懂、界面友好漂亮的语言打上了交道。在编写的过程中当然遇到了许多的问题,这里将一些简单的小程序写下来与喜爱编程的朋友们分享。
一、封面
封面的设计是这样的,先出现一窗体,上面为你喜欢的图案。然后出现一艘从左向右行驶着的船。屏幕上方从两侧分别移动出“欢迎”两个字。
具体的制作方法是:把预先选好的背景图案装入封面窗体中,窗体命名为CAI。再分别在三个图像控件(image)中装入预先制作好的位图“欢”、“迎”和船型图案。然后把三个image放置在初始位置(即图案刚在窗体出现时的位置),并把它们的可视属性都设置为“false”。程序如下:
SubForm_load()
cai.Show'显示封面窗体
DimI'定义变量
image3.visible=True'船型图像控件出现
a1:Ifimage3.Left6120Then
'6120为船移动到屏幕右边的坐标,此值可以随需要选取
image3.Moveimage3.Left+50
'移动此图像控件如嫌移动慢,可改变移动值