最新安徽建筑工业学院.doc

安徽建筑工业学院
Visual Basic 程序设计实验
85
安徽建筑工业学院
现代教育技术中心
实　验　报　告
课程名称：　Visual Basic程序设计
指导教师：＿＿＿＿＿
年 月 日
安徽建筑工业学院现代教育技术中心实验报告
实验二　顺序、选择结构程序设计
实验地点：第　 机房　　　　　 实验时间：　　年　月　日
实验目的
1．掌握各类表达式、赋值语句的书写规那么。
2．掌握常用函数的使用方法、掌握InputBox和MsgBox函数的使用方法和返回值的使用。
3．熟悉利用立即窗口来测试常用函数，各类表达式的计算结果。 表达式 语句的执行结果。
4．掌握If ～ 语句，If～Then ～语句If～Then ～EndIf语句和If ～Then ～ElseIf～…EndIf语句的使用规那么和执行流程。掌握Iif函数，Choose函数的使用规那么和方法。
Visual Basic 程序设计实验
10
5．掌握 Select Case ～ Case ～…Case Else ～End Select语句的使用规那么和执行流程。掌握Switch函数的使用规那么和方法。
实验内容
1．书写以下表达式：
①　＿＿＿＿＿＿＿＿＿＿＿＿＿
②　x和y是一个落在第一或第三象限内的点坐标＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
③　a是100以内的整数＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
2．求以下表达式的值
①语句Print Format ("HELLO", "<") 的输出结果是__________
②= "oppo,my OPPO music my Music 珍珠玉盘"，那么
Right(Label1,3) Left(Label1,4) Mid(Label1,9,4)
Instr(Label1，"OPPO") Len()
Instr(Instr(Label1，"m")+1,Label1, "m")
Visual Basic 程序设计实验
12
LenB()
③　"315"+23 & "12 mod 7"
④ "12e2"+23 & 315 mod 2
⑤ 7 and -1
3．选择答复
①InputBox函数返回值的类型为:
A)数值 B)字符串 C)变体 D)数值或字符串(视输入的数据而定)
②表达式4+5＼6*7/8 Mod 9的值是:
A)4 B)5 C)6 D)7
③语句Print Format(,"")的输出结果是:
A) B)32， C)032， D)32，
④执行语句InputBox "Today", "Tomorrow", "Yesterday" 将显示一个输入对话框，在对话框的输入区中显示的信息是：
A)Today B)Tomorrow C)Yesterday D)Day before yesterday
⑤表达式Int(5*Rnd+1)* Int(5*Rnd-1) 值的范围是_____.
Visual Basic 程序设计实验
12
A.[0,15] B.[-1,15] C.[-4,15] D.[-5,15]
⑥以下可作为Visual Basic变量名的是__________
A〕 A#A B〕 4A C〕 ?xy D〕 constA
⑦执行如下程序段时，从键盘输入-5，输出的结果是__________
x=-5
s=Val(InputBox("请输入s的值:"))
Select Case s
Case Is>0
y=x+1
Case Is=0
y=x+2
Case Else