vb实验报告标准答案.docVIP

实验一：常用标准控件（一） 【实验目的与要求】 1.掌握Visual Basic的启动与退出。 2.熟悉Visual Basic的集成开发环境。 3.掌握在窗体中放置控件的方法。 4.掌握在“属性窗口”中设置控件属性的方法。 5.掌握在“代码编辑器”窗口中输入程序代码的方法。 6.掌握工具栏上启动按钮、结束按钮的使用方法。 7.掌握标签、文本框、命令按钮、列表框等控件的使用方法。 【实验内容与步骤】 实验1.1 标签的使用(一) 对象属性 对 象 属性名称 属性值 Form1 Caption 标签 Label1 Caption 计算机等级考试 AutoSize True Font 三号 BorderStyle 1 实验1.2 标签的使用(二) 对象属性 对 象 属性名称 属性值 Label1 Width 2000 Height 300 BorderStyle 1 Alignment 2 Caption 等级考试 实验1.3 文本框的使用 程序代码： Private Sub T1_Change() T2=T1 End Sub 实验1.4 命令按钮的使用(一) 程序代码： Private Sub C1_Click() C1.Width=C1.Width+100 End Sub 实验1.5 命令按钮的使用(二) 对象属性 对 象 属性名称 属性值 Form1 Caption 确认 MaxButton False MinButton False Label1 Name L1 Caption 请确认 CommandButton1 Name C1 Caption 是 Height 300 Width 800 Default True CommandButton2 Name C2 Caption 否 Height 300 Width 800 Cancel True 实验二：常用标准控件（二） 【实验目的与要求】 1.掌握选项按钮、复选框和框架的使用方法。 2.掌握图像控件和图片框的使用方法。 3.掌握水平滚动条和垂直滚动条的使用方法 4.掌握图形控件的使用方法。 5.掌握计时器控件的使用方法。 【实验内容与步骤】 实验2.1 选项按钮的使用 程序代码： Private Sub Option1_Click() Text1.Alignment = 0 End Sub Private Sub Option2_Click() Text1.Alignment = 2 End Sub Private Sub Option3_Click() Text1.Alignment = 1 End Sub Private Sub Option4_Click() Text1.FontName = 宋体 End Sub Private Sub Option5_Click() Text1.FontName = 黑体 End Sub 实验2.2 复选框的使用 对象属性 对 象 属性名称 属性值 Form1 Caption 选课 Check1 Name CH1 Caption 数学 Value 0 Check2 Name CH2 Caption 语文 Value 1 Check3 Name CH3 Caption 外语 Value 0 Check4 Name CH4 Caption 计算机 Value 1 实验2.3 图像的使用 程序代码： Private Sub Cmd1_Click() Image1.Picture = LoadPicture(App.Path \图片1.jpg ) End Sub Private Sub Cmd2_Click() Image1.Picture = LoadPicture() End Sub 实验2.4 图片框和滚动条的使用 程序代码： Private Sub Command1_Click() VScroll1.Min = 100 VScroll1.Max = 2400 VScroll1.LargeChange = 200