《VB程序设计》实验指导书

《VB 程序设计》实验指导书 18 学时 实验一 VB 集成环境及简单应用程序的建立 一、实验目的 1 ．掌握 Visual Basic启动和退出的方法。 2 ．熟悉 Visual Basic的集成开发环境。 3 ．掌握 Visual Basic程序设计的基本步骤。 4. 掌握窗体的使用方法。 二、实验内容 1 启动 Visual Basic，然后创建一个“标准 ”工程。了解 Visual Basic集成开发 环境下各组成部分及其作用。 【要求】 （1 ）在集成开发环境中分别寻找“窗体窗口”、“属性窗口”、“工程资源管理器”、 “窗体布局窗口”、“工具箱窗口”，熟悉它们的默认位置。 （2 ）在“视图”或“工程资源管理器”中切换显示“代码窗口”和“窗体窗口”。 （3 ）在“视图”菜单中点击“立即窗口”，观察刚刚显示出来的“立即窗口”。 （4 ）尝试分别将各部分关闭，然后再用“视图”菜单中对应的菜单命令将其显示。 2 编写一个简单的应用程序。要求窗体的标题为“简单 VB 实验”；窗体中有一个标题 为“显示”的按钮；单击该按钮后在窗体上显示蓝色的“江西农业大学”。 【步骤】 （1 ）设计应用程序的界面； （2 ）设置对象的属性； （3 ）编写事件代码； （4 ）程序的运行及保存。 【提示】 在窗体上显示“江西农业大学”有两种方法： （1）用 Print 方法：颜色应该设置窗体的前景色。 （2）用一个标签控件：颜色应该设置标签控件的前景色。 【思考】为什么在以上两种方法中在颜色的设置问题上有所不同？ 3 窗体无最大化和最小化按钮。在窗体装入时，在窗体的标题栏显示“装入窗体” ，并 在窗体上装入一幅图片作为背景；当用户单击窗体，在标题栏显示“鼠标单击” ，在窗体上 显示“单击窗体” ；当用户双击窗体，在标题栏显示“鼠标双击” 。去除窗体的背景图案，并 显示“双击窗体” 。 实验二 VB 常用控件的使用 一、实验目的 1 ．掌握基本控件（标签、命令按钮和文本框）的基本使用方法。 2. 掌握 Visual Basic程序设计的基本步骤。 二、实验内容 1 利用标签做浮雕效果文字。效果如图 2-1所示。 图 2-1 实验 2-1程序运行界面 2 编写一个应用程序，界面如图 2-2 所示。窗体中文字“VB 应用程序！”为一标签控 件，单击标题为“放大”的命令按钮，则“VB 应用程序！”的字号放大一号，单击“缩小” 按钮则反之；同时，窗体中还有 4 个含某种指向图案的按钮，若单击某个按钮，则使“VB 应用程序！”向该按钮所指向的方向移动 50Twip。 【提示】 四种指向的图案自行在网上搜索，也可以选择任意喜欢的图案替换。 图 2-2 实验 2-2 程序运行界面 实验三 Visual Basic 语言基础 一、实验目的 (1)掌握 Visual Basic的数据类型和变量定义方法。 (2)正确使用 Visual Basic的运算符和表达式。 (3)掌握 Visual Basic中数据输入、输出的方法。 (4)掌握 Visual Basic常用函数的使用方法。 (5)学会用赋值语句构造简单的顺序结构程序。 二、实验内容 1 假设有变量 a=2,b=5,c=4,d=3,e=6，编写程序，计算表达式 a+bc and d*a=e 的值，将结果 打印在窗体上。 【提示】注意复合表达式的运算顺序。 【思考】复合表达式按什么样的顺序运算？ 2 在文本框输入一个三位数据，单击窗体后，在窗体打印输出该数的个位数，十位数和百位 数。 3 随机生成一个三位正整数，将它顺序和逆序输出。例如，生成的随机三位整数是 246，逆 序则为 642。 【提示】 1．把这个整数的个位，十位，百位单独求出来，然后进行个十百的连接。 2．利用字符串函数。 4 编程序，当单击窗体，在窗体上随机位置，随机输出一个大写的英文字母。 【提示】 随机大写的英文字母由表达式 chr(Int(Rnd*26)+65)产生，窗体上的随机位置通过设置当 前坐标 CurrentX，CurrentY 属性来确定。 5 编写一模拟简易计算器的程序，运行界面如图 3-1 所示。 图 3-1 实验 3-5 程序运行界面 实验四 顺序结构程序设计 一、实验目的 1 ．掌握常量和变量、表达式的基本概念和正确书写格式。 2 ．掌握赋值语句和常用函数的正确使用方法。 3. 掌握输入、输出对话框（Box和 MsgBox）的基本使用方法。 二、实验内容 1 已知三角形三条边 a 、b 、c ，从键盘输入其值( 利用 box函数) ，编写程序，计 算三角形的面积。 2 编写程序， 界面如图 4-1所示。 使得单击一次按钮可以产生一个[60,90]之间的随机 数并显示在标签 1 上，再求出该数的正弦值，将结果写在标签 2 上。 【提示】 （1 ）使用 Rnd函数产生随机数，注意，为了防止两次运行程序的随机数序列相同，调 用 Rnd之前先用 Randomize语句进行初始化。 （2 ）产生某闭区间内的随机数的公式为：( 上限- 下限+1)*rnd+下限。 （3 ）求正弦值函数为：sin()。 【思考】怎样产生一个[60,90]之间的随机数？ 3 编写一个华氏温度 F 与摄氏温度 C 之间转换的应用程序， 界面如图 4-2 所示。 其中 F 与 C 之间的关系为： 32 5 9 CF 。 4 编写计算圆面积和球体积的程序， 程序运行界面如图 4-3所示。 要求输出结果只保留 四位小数；如果半径的输入不合法，例如含有非数值字符，应该用 MsgBox报告输入错误， 并在错误信息得到用户确认( 点击 MsgBox对话框上的“确定”按钮) 之后，将输入焦点转移 到输入半径的文本框中，且将当前的非法输入自动选定，反白显示。 【提示】 （1）判断输入值是否为数值类型可用函数 IsNumeric()； （2）VB 大部分数据类型之间在适当的时候会自动相互转换，此谓隐式转换。例如， 文本框的 Text 属性为字符串类型，当用 Text 属性值直接参加算术运算时，Text 属性值先会 自动转换为数值类型，然后再参加算术运算。但是当 Text 属性值含有非数字字符时，会产 生“类型不匹配”的运行时错误，因此有些情况下采用显示转换更为安全妥当。 当字符串类型向数值类型转换时用函数 Val()；而当数值类型向字符串类型转换时，可 以用 Str()函数或格式化函数 at()。 图 4-1 实验 4-2 程序运行界面 图4-2 实验4-3程序运行界面 图 4-3 实验 4-4 程序运行界面 实验五 选择结构程序设计 一、实验目的 1 、掌握逻辑表达式及关系表达式的正确书写形式。 2 、掌握 IF 语句单行和块书写格式及其正确使用（尤其注意 ELSE 和 ELSE IF） 。 3 、掌握多分支情况的控制（使用 Select CASE 语句）的使用及与多分支条件语句的区 别。 二、实验内容 1 有函数：          )10(124 )101 (23 ) 1( xx xx xx y 写一个程序，输入 x 值后，则输出相应 y 值。要求用“If…Els