vb程序设计概述

vb程序设计概述

ID:26448645

大小:6.71 MB

页数:32页

时间:2018-11-27

vb程序设计概述_第1页
vb程序设计概述_第2页
vb程序设计概述_第3页
vb程序设计概述_第4页
vb程序设计概述_第5页
资源描述:

《vb程序设计概述》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第一章VB程序设计概述实验一[实验1.1]建立—个工程,并运行程序,体会效果。[实验目的]掌握一个简单的VB程序的建立、编辑、调试、运行和保存方法。[步骤](1)进入VB环境,执行“文件/新建工程”命令,在其对话框中选择“标准EXE“;(2)在窗体上建立两个命令按钮、一个标签、一个时钟;在属性窗口对各控件属性进行设置,见表1.1;(3)在代码,窗口的四个事件过程Form_Load()、Command1_Click()、Command2_Click()、Timer1_Timer()中分别输入代码,建立MyMove过程,并输入代码。(4)单击按钮,运行程

2、序;有错时进入代码窗口调试。(5)将窗体、工程分别以syl—1.frm(窗体文件)、syl—1.vbp(工程文件)保存在磁盘上。表1.1属性设置控件名属性属性值Form1Caption“简单动画”Picture“Background.bmp”Command1Caption“”Style1PictureClock05.icoToolTipText“手动”Command2Caption“”Style1PictureKey04.icoToolTipText“自动”Label1Caption“欢迎使用”FontSize36FontName”隶书”Timer1

3、Interval4000注意:Ø窗体的背景图形文件Background.bmp在“川师VB实验指导书

4、bmp”文件夹里。Ø本实验指导书中的各个实验的位图文件(bmp)、图标文件(ico)、多媒体文件格式(AVI)等均在“川师VB实验指导书”文件夹下面。Ø当然读者也可以任选自己喜欢的图形文件。程序代码:PrivateSubCommand1_Click()Label1.Caption="欢度国庆节"EndSubPrivateSubCommand2_Click()Label1.Caption="欢聚一堂"EndSubPrivateSubTimer1_Tim

5、er()Label1.Visible=FalseEndSub32[实验1.2]Move方法练习,移动具有浮雕效果的文字和插入图片。在窗体中插入图片,文件名为”So02963_.wmf”(读者也可插入所喜欢的图片),窗体上以浮雕效果显示的字符串“新年快乐”,还有两个命令按钮,文件Point02.ico表示左指向,文件Point04.ico表示右指向,如图1.2所示。要求当单击“左指向”按钮时,字符串“新年快乐”向左移动50;单击“右指向”按钮时,向右移动50。[实验目的]本题主要训练在有关控件中装入图形文件、标签浮雕效果的实现和控件的移动功能。[分析]

6、(1)窗体、命令按钮、标签的属性设置见表1.2所示。(2)在窗体插入图片,只要对窗体的Picture属性单击,即可打开“加载图片“窗口,选择图片文件。(3)在窗体上实现浮雕效果,只要使用两个具有相同文字的标签,使它们的位置有些位移,并且字的颜色不同即可。(4)要使文字移动,有两种方法:对标签进行Move方法;或对位置属性Left(左右移动)、Top(上下移动)进行改变。表1.2属性设置控件名属性属性值Form1Caption“移动”Picture“So02963_.wmf”Command1Caption“”Style1PicturePoint02.i

7、coCommand2Caption“”Style1PicturePoint04.icoLabel1,Label2Caption“新年快乐”FontSize30FontName“隶书”Backstyle0-transparent[程序]PrivateSubForm_load()Label2.Top=label1.Top+50‘label控件通过位置错位和颜色结合产生浮雕效果Label2.Left=label1.Left+50‘label2和Label1错位Label2.ForeColor=RGB(255,0,0)‘label2字为默认红色Label1.

8、ForeColor=RGB(0,255,0)‘label1字为绿色EndSub‘控件移动可通过Move方法实现,见左移PrivateSubCommand1_Click()Label1.Movelabel1.Left-50Label2.MoveLabel2.Left-50EndSub‘也可通过控件的位置属性改变移动,见右移PrivateSubCommand2_Click()32Label1.Left=label1.Left+50label2.Left=label2.Left+50EndSub程序运行界面如图1.2所示。[进一步思考]当左移后,标签离开窗

9、体的左边,如何使它循环到窗体的右边进入;同样,右移也做相应的改变。[实验1.3]控件的字体设置和随机数的使用

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。