VB实验报告7（整理）（一）.pdf

学 海 无 涯 台州学院 《VB 程序设计》实验报告 实验七：常用控件 班级：10 物理2 学号： 姓名： 实验日期：2011 1 学 海 无 涯 一、实验目的和要求 1．掌握基本控件的重要属性、事件； 2 ．熟练掌握在窗体上建立上述控件的操作方法； 3 ．熟练掌握事件过程代码的编写； 4 ．初步掌握建立基于图形界面的应用程序的过程。 二、实验主要仪器和设备 计算机一台，Windows XP 操作系统，Visual Basic 环境。 三、实验内容 实验7.1 设计一个字体修饰的程序，界面如图7-1 所示。要求：框架1 中有两个复选框， 可以选择粗体和斜体对标签中的文字进行修饰；框架2 中有两个单选按钮，可以选择宋体或 楷体对标签中的文字进行修饰；标签Label1 的文字内容为“Visual Basic 程序设计”，宋体， 常规，三号；文字对齐方式为居中。 图7-1 字体修饰 实验7.2 设计一个点菜的程序，界面如图7-2 所示。要求：框架中的复选框提供可选择 的三种套餐，右边的文本框中可以输入数量；输入时文本框只接受数字键；并且只有选取了 相应的套餐后才可以进行输入；如果没有选取套餐，那么文本框不能编辑并清空；单击“确 定”按钮，统计点餐的金额，并用消息框显示出来； 图7-2 点菜 实验7.3 设计一密码修改程序，要求。 1）当单击“确定”按钮后，首先比较“用户名”和“原密码”是否一致，若一致且都 为“admin ”，则继续执行步骤2 ；否则弹出消息框，提示用户出错，并让用户重新 输入。 2 ）比较“新密码(N) ”和“新密码(S) ”，若两者一致，弹出密码修改成功消息框，程 序终止执行。否则弹出错误消息，并让用户重新输入。 3 ）当单击“取消”按钮后，程序终止执行。 2 学 海 无 涯 图7-3 密码修改 实验7.4 （选做）设计一个拨号盘的程序。界面如图7-4 所示。要求：命令按钮数组构 成数字键，单击数字键按钮，将拨号的内容显示在文本框Text1 中；单击“重拨”按钮，再 现原来的拨号过程； （提示：再现过程由定时器实现）定时器的时间间隔为0.5 秒；设置文本框最多接受10 个字符。 图7-4 拨号盘 四、实验原始纪录 实验7.1 程序的界面设计。 3 学 海 无 涯 4 学 海 无 涯 程序代码。 Private Sub Check1_Click() If Check1.Value = 1 Then Label1.FontBold = True Else Label1.FontBold = False End If End Sub Private Sub Check2_Click() If Check2.Value = 1 Then Label1.FontItalic = True Else Label1.FontItalic = False End If End Sub Private Sub Opti