VB实验报告1-9

实验一：设计简单的VB应用程序

一、实验目的

1．掌握Visual Basic启动和退出的方法。 2．熟悉Visual Basic的集成开发环境。

3．掌握Visual Basic程序设计的基本步骤，了解VB程序的编写、保存和编译的方法过程。

4．初步了解几个常用基本控件控件（标签、命令按钮和文本框）的使用方法。 二、实验类型

综合

三、实验时间：2012-3-9 四、实验任务

1、启动Visual Basic，然后创建一个“标准 EXE”工程（保存在D盘以自己学号命名的文件夹中，文件名和窗体名均为SJT），并了解Visual Basic集成开发环境下各组成部分及其作用。

2、编一程序，计算任意输入的正整数的平方根。

3、编写一个应用程序，界面如图1-1所示。窗体中文字“VB应用程序！”为一标签控件，单击标题为“放大”的命令按钮，则“VB应用程序！”的字号放大一号，单击“缩小”按钮则反之；同时，窗体中还有4个含某种指向图案的按钮，若单击某个按钮，则使“VB应用程序！”向该按钮所指向的方向移动50Twip。（提示：四种指向的图案可以在Visual Basic安装目录中的“…graphics\\icon\\Arrows”子目录中找到，名称分别为arw07dn.ico 、arw07lt.ico、arw07rt.ico和arw07up.ico）

五、实验要求 图1-1 实验1-2程序运行

写出实验报告，内容是： 1、第1小题的操作步骤 2、第2、3题

1).程序的界面设计。 2).程序主要代码。

3).运行结果（输入与输出）。

4).实验总结。(写上你自己的总结。可以从以下几个方面来总结：你在编程过程中

花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)

实验二：数据的输入和输出

一、实验目的

1．掌握常量和变量、表达式的基本概念和正确书写格式。

2．掌握基本语句（Print语句、赋值语句、Dim语句等）的使用； 3、掌握常用函数的正确使用方法；

4、掌握数据的动态输入InputBox和信息提示MsgBox的基本使用方法。； 二、实验类型

综合

三、实验时间：2012-3-23。 四、实验任务

1、运算符与表达式实验：在立即窗口显示下列表达式的值（先定义Amt变量为字符型，值为\；Bmt变量为整型，其值为3）。（要写出打开立即窗口的步骤及运行结果）

① Bmt3 ② Bmt+23 ③ - Bmt ④ Bmt-12 ⑤ Bmt*Bmt ⑥ 10/Bmt ⑦ 10\\Bmt ⑧ 9 Mod Bmt ⑨ Amt & Bmt ⑩ Amt > Bmt

2、常用内部函数实验：在立即窗口显示下列函数的运行结果（要写出函数及运行结果） ① cos45° ② e3 ③ |-5|④ 字符\对应的ASCII码值 ⑤ 系统日期和系统时间 3、思考如下程序的输出结果 Private Sub Form_Click()

Dim str As String, i As Integer str = \ i = 100 Print 2 & 3 Print 2 + 3 Print 2 + \ Print str & \ Print str + \ Print str & i Print str + i Print i & \ Print i + \End Sub

先思考，然后可以在计算机中测试，查看自己的思考结果与计算机输出的结果是否相同 4、编程：输入圆的半径，计算并输出圆的面积和球体积，按下列要求实现。 （1）界面设计尽可能美观、大方。

（2）单击命令按钮，调用InputBox函数输入数据，通过MsgBox显示计算结果。 五、实验要求

写出实验报告，内容是：

1).程序的界面设计。2).程序主要代码。3).运行结果。

4).实验总结。(写上你自己的总结。可以从以下几个方面来总结：你在编程过程中

花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)

实验三：选择结构程序设计

一、实验目的

1、掌握逻辑表达式及关系表达式的正确书写形式。

2、掌握单行IF语句和块IF书写格式及其正确使用（尤其注意ELSE 和ELSE IF）。 3、掌握多分支情况的控制（使用Select CASE语句）的使用及与多分支条件语句的区别。

二、实验类型

综合

三、实验时间：2012-4-6 四、实验任务

1、设计一个猜数字游戏软件，点击出题按钮，产生一个10到99的随机数，然后在文本框中由用户输入数字，如果结果不对，应提示是大了，还是小了，否则提示正确。运行界面如图3-1所示。（思考：如何限制用户猜数字的次数？）

2、有函数：

?x?y??3x?2?4x?12?(x?1)(1?x?10) (x?10)

写一个程序，输入x值后，则输出相应y值。要求用“If…ElseIf…EndIf”和用“Select Case”两种方法完成该题目。

3、输入一年份，判断它是否为闰年，并显示相关信息 五、实验要求

写出实验报告，内容是： 1).程序的界面设计。 2).程序主要代码。 3).运行结果。

4).实验总结。(写上你自己的总结。可以从以下几个方面来总结：你在编程过程中

花时多少？时间是怎么分配的？多少时间在思考问题？遇到了哪些难题？你是怎么克服的？你对你的程序的评价？你的收获有哪些？)

实验四：循环结构程序设计

一、实验目的

1、掌握For语句的使用。

2、掌握Do{While|Until}?Loop与Do?Loop{While|Until}两种形式的使用。 3、掌握如何控制循环条件，防止死循环或不循环。 4、熟练掌握循环条件设置及循环的控制方法。 二、实验类型

综合

三、实验时间：2012-4-20 四、实验任务

1、编一程序，显示出所有的水仙花数。所谓水仙花数是指：一个三位数的各位数字立方和等于该数字本身。如：153=1?5?3，因此153是一个水仙花数。

2、编写程序，求1+2+3+...+100的和，将结果打印在窗体上。

思考：用Do ... Loop While循环和Do While ... Loop循环应该怎样实现？进一步地，要用Do ... Loop Until循环或Do Until ... Loop循环又该如何实现？（写在实验报告中）

3、计算S?1?133322?132?142???1n2的值，当第i项1i2?10?5时结束。

4、求整数m、n的最大公约数、最小公倍数 五、实验要求

1、做好实验预习，提前设计程序。 2、写出实验报告，内容是： 1). 程序主要代码 2).运行结果。 3).实验总结。