visual basic 实验指导书2013

《visual basic 实验指导书2013》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、VisualBasic6.0实验指导书2013实验1：VisualBasic的基本操作一、实验目的1.掌握基本的VisualBasic集成开发环境的使用2.掌握基本的VisualBasic窗体程序开发流程3.掌握窗体属性的修改和设置4.掌握标签（Label）、按钮（CommandButton）、滚动条（ScrollBar）、时间计时器控件（Timer）的使用。二、实验内容1.打开VisualBasic6.0的集成开发环境，创建一个新的项目（project），然后保存到以自己的学号为目录名的文件夹中；2.创建如下的窗体程序：程序运行时，鼠标拖动6滚动条来调

2、整移动速度，速度越大移动越快，速度显示在4标签上；按7“开始”按钮开始运动，运动时2标签左右移动，当到达边界的时候则反向运动，同时标签上显示当前的系统时间，同时按钮的文字变为“暂停”。图1-1UI规划图1-2运行时的界面三、实验指导1.打开VB集成开发环境，选择菜单“文件”--“新建工程”，创建一个新的“标准EXE”项目，然后选择“文件”--“保存工程”，在硬盘上创建一个以自己学号为名字的目录，然后保存所有的文件在那个目录中。2.按照图1-1所示添加相应的控件，并修改相关的属性，如下表所示：序号窗口/控件类型属性名属性值说明1窗体（Form）名称Form

3、1caption实验1：运动的时间窗体的标题2标签（Label）名称LbMoveTimecaption(空)初始值为空，等到时间时就设置为当前时间3标签（Label）名称Lable2Caption移动速度：标签4标签（Label）名称lbMoveSpeedCaption10速度值，10是初始值5计时器（Timer）名称Timer1EnabledFalse设置计时器初始不打开Interval1000设置计时器时间间隔（1000为1000毫秒ms，即为1秒）6水平滚动条（HScroll）名称hsMoveSpeedMin10最小值（滚动条最左端）Max1000

4、最大值（滚动条最右端）SmallChange1最小递增（减）值（按最左最右的箭头按钮）LargeChange100最大递增（减）值（按滚动条的空白区域）Value10当前滚动条滑块的数值7命令按钮（CommandButton）名称cbStartCaption开始1.编写下面的事件处理程序：（注意，写下面的程序时，先转到代码窗口，在左上角下拉列表中先选择控件变量，然后在右上角下拉列表中选择对应事件，在生成的代码块中编写代码，注意行号不用写）1.PrivateSubcbStart_Click()2.Timer1.Enabled=NotTimer1.Enabl

5、ed3.If(Timer1.Enabled=True)Then4.cbStart.Caption="暂停"5.Else6.cbStart.Caption="开始"7.EndIf8.EndSub9.PrivateSubhsMoveSpeed_Change()10.lbMoveSpeed.Caption=hsMoveSpeed.Value11.Timer1.Interval=1010-hsMoveSpeed.Value12.EndSub13.PrivateSubTimer1_Timer()14.StaticstepxAsInteger15.ConstSTEP

6、_VALUE=10016.17.If(stepx=0)Thenstepx=STEP_VALUE18.If(lbMoveTime.Left+lbMoveTime.Width>Form1.Width)Thenstepx=-STEP_VALUE19.If(lbMoveTime.Left<=0)Thenstepx=STEP_VALUE20.lbMoveTime.Left=lbMoveTime.Left+stepx21.22.lbMoveTime.Caption=Now23.EndSub24.一、思考题1.上面的第14行为什么要用static？2.上面的第11行为

7、什么不直接Timer1.Interval=hsMoveSpeed.Value？3.简单说明如何实现按钮的文字变化。实验2：窗体综合设计一、实验目的1.掌握框架（Frame）、文本框（TextBox）、复选框（CheckBox）、选项按钮（OptionButton）、列表框（ListBox）、下拉列表框（ComboBox），图像框（Image）、图形框（PictureBox）的使用；2.掌握驱动器列表框（DriveListBox）、目录列表框（DirListBox）、文件列表框（FileListBox）的使用；3.掌握鼠标事件处理的一般方法。4.掌握多窗口

8、的相互调用。5.掌握VB中绘图的方式。二、实验内容1.创建如图2-1的画图板应用