实验3数据的输入与输出

实验三数据的输入与输出

一、实验目的

1．掌握Print方法的使用，尤其是各种输出格式的设置。

2．掌握InputBox函数的使用。

3．掌握MsgBox函数和MsgBox语句的使用。

二、实验内容

1．实验准备

在练习文件夹中建立vb3-1、vb3-2、vb3-3、vb3-4、vb3-5、vb3-6、vb3-7文件夹。

2．Print方法实验

例1：设计一个简单的VB程序。程序运行时，单击窗体，分别用紧凑格式、标准格式和自定义格式，在窗体上输出打印项。界面如下：

图打印格式实验窗体界面设计

（1）创建工程。

（2）建立用户界面在窗体下方画5个命令按钮，自左至右，名称依次为Command1 ~ Command5，如图所示。

（3）设置各对象的属性。各控件主要属性的设置参见表。

表属性设置

对象属性属性值说明

Command1Caption紧凑格式标题

Command2Caption标准格式

Command3Caption自定义格式

Command4Caption换行

Command5Caption清除

（4）编写命令按钮的事件代码。

双击“紧凑格式”按钮，进入代码编写窗口，编写如下代码：

在输入以上代码时要注意区分中英文双引号。中文标点只能作为字符串的一部分或出现在注释文字之中。

（5）调试运行程序。

单击菜单[运行]—[启动]，或者单击工具栏的“启动”按钮，单击各个按钮，查看

效果。如单击“标准格式”和“自定义格式”按钮后，效果如图所示。

图 Print输出效果

保存结果到练习文件夹中的vb3-1文件夹。

3．InputBox函数实验

例2：设计一个简单的VB程序，界面如下：

图 InputBox函数实验界面设计

（1）创建工程。

（2）建立用户界面。各控件主要属性的设置参见表。

表属性设置

对象属性属性值说明

Form1Caption InputBox函数实验标题

Label1Caption串相加标题

Label2Caption数相加标题

Text1Text清空

Text2Text清空Command1Caption计算并输出标题

（3）双击按钮控件，切换到代码设计窗口，添加程序代码如下：

（4）调试运行程序。

单击“计算输出”按钮，弹出InputBox对话框，输入数据，如图所示，然后单击“确定”按钮或者直接回车。两个数据都输入之后，返回到窗体，在两个文本框中可见到串相加和数相加的结果，如图所示。

图 InputBox函数实验数据输入

图 InputBox函数实验运行结果

保存结果到练习文件夹中的vb3-2文件夹。

4．MsgBox实验

例3：设计一个简单的VB程序。输入一个字符，判断它是大写字母、小写字母、数字，还是其他符号。程序代码如下：

（1）创建工程。

（2）双击窗体控件，切换到代码设计窗口，输入代码：

（3）调试运行程序。

运行调试：单击窗体，在输入对话框中输入一个字符，程

序将根据输入字符的类型，例如输入“H”后，MsgBox弹出如图

所示的对话框。

保存结果到练习文件夹中的vb3-3文件夹。

图测试字符值对话框三、思考题

1．设计一个程序。利用Tab函数和Print方法在窗体上显示表达式的值。在代码窗口中输入以下程序代码段，运行程序，单击窗体，观察在窗体上显示的结果。

请写出程序运行的结果。

保存结果到练习文件夹中的vb3-4文件夹。

2．设计一个程序。要求：设有变量a=2,b=5,c=4,d=3,e=6（变量的值通过InputBox函数输入），计算表达式a+b>c and d*a=e的值，然后将结果在窗体上输出。

保存结果到练习文件夹中的vb3-5文件夹。

3．设计一个程序。要求：单击一次按钮可以产生一个[60,90]之间的随机整数并显示在标签上。

保存结果到练习文件夹中的vb3-6文件夹。

4．设计一个程序。要求：在窗体上显示如下图案。

保存结果到练习文件夹中的vb3-7文件夹。