VB实验报告
实验三 VB语言基础
实验日期：______年______月______日 成绩：_____________
一、实验目的
1. 理解常量与变量的作用，掌握各种常量的表示方法。 2. 掌握各种类型常量与变量定义。 3. 了解各种数值型数据类型的表示范围。
4. 掌握各种运算符及其运算优先级、各种表达式的定义方法。 5. 掌握常用内部函数的使用。
二、实验内容
实验3.1 试写出字符串、布尔、日期常量。
实验3.2 建立含有一个命令按钮的窗体，输入下列程序代码。单击“启动”按钮，运行程序，分析产生显示结果的原因。
Private Sub Command1_Click()
Dim x1 As Double Dim x2 As Single Dim x3 As Currency x1 = 147.576572 x2 = 147.576572 x3 = 147.576572 Print \Print \Print \
End Sub
实验3.3 在命令按钮单击事件中定义整型和字节型两种类型的变量，分别赋予一个数值常量，要求在大小两端刚刚超出数据范围，使得运行出现如图3-1所示结果。
实验3.4 选择合适x作实参，在立即窗口验证表3-1中部分函数的功能。
实验3.5 设计一个表达式，使其结果为1-13之间（含二者）的一个整数，并验证。
8
VB实验报告
实验3.6 写出表达式：5 mod 24 / 4 \\ 2 的结果，并比较运算符 /、\\与mod的优先级。
实验3.7 设计判断闰年（设变量为y）的表达式；闰年条件：年份是400的倍数或者年份是4的倍数但不是100的倍数。
图3-1 实验3.3运行结果
实验3.8 根据给出的参数，试写出表3-2中函数的结果，并在立即窗口中验证。
三、实验记录
1.写出字符串、布尔、日期常量
字符串常量: 布 尔常量: 日 期常量:#1
2.写出实验3.2中产生显示结果的原因
运 行 结 果 147.576572 原 因 Double类型有15位有效数字
3.写出实验3.3中产生出错的数据对。
整 型 与 字 节 型 与 9
VB实验报告
4.根据所给的参数，填写表3-1
表3-1
函 数 Int(x) Fix(x) Hex$(x) Oct$(x) Asc(x$) Chr$(x) Str$(x) Val(x$) CStr$(x) 实 参 -3.4 -3.4 10 10 “Aba” 90 45 \45 结 果 函 数 CInt(x) Sin(x) Tan(x) Abs(x) Sgn(x) Sqr(x) Exp(x) Now( ) Rnd( ) 实 参 -3.6 30 45 -45 -45 9 3 --------- 结 果 ----------
5. 写出实验3.5中的表达式和5次执行结果
表达式 执行结果 Int(13 * Rnd + 1) 7 8 4 4 11
6. 写出实验3.6中表达式执行过程的变化过程
表达式变化过程 5 mod 24 / 4 \\ 2 最后结果 所运行的运算符 /
7. 写出实验3.7中表达式和三次执行结果
判断闰年（设变量为y）的表达式：
年份(y) 表达式值 1900 False 2000 True 2003 False 2004 True
10
VB实验报告
8. 根据所给的参数，填写表3-2
表3-2
函数 Ltrim(x$) Trim(x$) Rtrim(x$) Left$(x$,n) Mid$(x$,p[,n]) Len(x$) LenB(x$) String(n,x$) InStr(x1$,x2$) Ucase$(x$) Space(n) 函数表达式 LTrim(\ LTrim(\ LTrim(\Left(\Mid(\Len(\数数我 有几个字符\Len(\数数我 有几个字符\String(2,\把首字符写两遍\ 结果 InStr (\到串1中找串2\串2\ Ucase( \Space(2 )
四、实验思考
1.在输入学生成绩时，对输入的数据要进行合法性检验，过滤掉不合法的数据,如输入了非数字型数据或负号等。假设有一个Text1控件，要求输入数字型数据，请问要用到那个系统函数？
2.程序设计中有许多数据在输出时有一定的格式要求。请说明下面几个函数的功能，并进行比较。
Tab(n) Spc(n) Space(n)
Format(表达式[,格式字符串])
11
VB实验报告
五、问题解决
六、实验小结
12
VB实验报告
