实验二：窗体、命令按钮、文本框和标签控件的应用.docVIP

韶关学院计算机公共教学实验进行表 （实验报告） 课程名称 计算机语言与程序设计 实验日期 实验项目名称 实验二：窗体、命令按钮、文本框和标签控件的应用 实验类型(打√) 基础√ 、综合 、设计 。 实验地点 理工楼6楼 号机房 实验班级 应到人数 实到人数 考勤情况 主讲教师 实验教师 实验目的 实验目的： 1、掌握Visual Basic6.0窗体的常见属性的含义及其值的设置。 2、掌握Visual Basic6.0窗体的常用方法（如CLS方法、Print方法等），掌握用Print方法在窗体上输出特定格式的数据的设置。 3、掌握Visual Basic6.0窗体常用事件的使用。 4、掌握在多窗体中启动窗体的设置。 5、掌握在窗体上设置控件的几种方法。 实验内容 一、打开“D:\sy2”文件夹下面的“选择题及编程填空.Xls”文件，在对应位置输入正确的答案后以原文件名存盘。 二、编程题 实验1：设置一个标题为“字体设置”的窗体，窗体的背景色为黄色，在窗体中设置二个命令按钮和一个文本框，每次单击“确定”按钮，在文本框中显示红色三号隶书字体，内容为“开学了，欢迎你来校报到!”，并使文本能自动换行显示，单击“结束”按钮，则退出程序运行。（工程文件保存为：SY2_2.vbp,窗体文件保存为SY2_2.frm） (说明：能使文本能自动换行显示的属性为MultiLine，其值为True时文本可以显示在多行，其值为False时文本只能显示在一行。) 实验步骤： 第1步： 创建新工程，在新窗体上创建二个命令按扭Command1、 Command2和一个文本框Text1。 第2步：设置对象的属性 对象类型 对象名 属性设置 窗体 Form1 Caption 字体设置 BackColor 黄色 命令按钮 Command1 Caption 确定 命令按钮 Command2 Caption 结束 文本框 Text1 Text 空白 Font 三号隶书 MultiLine True 补充完成代码编写 Private Sub Command1_Click() Text1.ForeColor =vbred Text1.Text = 开学了，欢迎你来校报到! End Sub Private Sub Command2_Click() End End Sub 第4步：保存为sy2_1.vbp和sy2_1.frm文件。 单击工具栏按钮，或选择“文件”－“保存工程”菜单命令，弹出“保存工程”对话框，工程文件保存为：SY2_2.vbp,窗体文件保存为SY2_2.frm。 第5步：运行调试程序单击工具栏中运行按钮或按F5功能键，也可使用菜单命令“运行”－“启动”。 实验2： 设计一程序，当程序运行后，在窗体的正中间显示你好！请输入你的姓名。当用户在文本框中输入姓名并单击确定按钮后，在窗体中用黑体、三号、红色显示***同学，你好，祝你学好VB程序设计！，同时窗体上出现两个命令按钮继续和结束，其中***”是用户输入的姓名。（图一为运行前设计界面；图二-图四为运行过程界面；图五为事件代码） 图一（设计界面）????????????????? 图二（初运行时，“继续”按钮隐藏，对象隐藏通过修改对象的Visible属性实现） ??????? 图三（点“确定”后，按要求显示）????????? 图四（点击图三中按钮“继续”）设置对象的属性 对象类型 对象名 属性设置 你好！请输入你的姓名 命令按钮 Command1 Caption 确定 命令按钮 Command2 Caption Visabled False 文本框 Text1 Text 空白 补充完成代码编写 图五（“确定”和“继续”按钮的事件代码 第4步：保存为sy2_2.vbp和sy2_2.frm文件。 单击工具栏按钮，或选择“文件”－“保存工程”菜单命令，弹出“保存工程”对话框，工程文件保存为：SY2_2.vbp,窗体文件保存为SY2_2.frm。 第5步：运行调试程序单击工具栏中运行按钮或按F5功能键，也可使用菜单命令“运行”－“启动”。 三、编程填空（请注意：按照要求在VB中完成编程填空后，务必打开实验文件夹下“选择题及编程填空.Xls”文件，把编程填空的答案填入到对应的位置，否则不得分） 练习3：编写程序，实现：在文本框1中输入圆的半径，求圆的面积。操作要点：打开“D:\sy”文件夹下面的sy_3.frm文件，删除#####[N]#####处的内容，其位置填上自己补充的内容后以原文件名存盘。 实验步骤： 第1步： 启动VB6.0。 第2步：双击命令按钮，打开代码窗口补充完成代码编写 D