[北京师范大学]19春《Visual Basic 程序设计》离线作业（答案）
本课程作业由两部分组成。第一部分为“客观题部分”，由15个选择题组成，每题1分，共15分。第二部分为“主观题部分”，由编程题组成，共15分。作业总分30分，将作为平时成绩记入课程总成绩。客观题部分：
选择题（每题1分，共15题）
1. 下列哪个选项不是Visual Basic语言的特点（ ）。
A） 事件驱动编程机制
B） 可视化编程
C） 结构化程序设计
D） 面向过程的程序设计
2. Visual Basic的版本中不包含（ ）。
A）学习版 B）专业版 C）企业版
D）标准版
3. 下列选项中不属于主窗口的是（ ）。
A）工具栏 B）菜单栏 C）状态栏 D）标题栏
4. 下列（ ）计量单位是与屏幕分辨率无关的。
A）twip B）Point C）Pixel
D）Inch
5. 工程资源管理器窗口不能显示（ ）文件。
A） 窗体文件(.frm)
B） 标准模块文件(.bas)
C） 控件文件（.ctl）
D） 资源文件（.res）
6. 下列（ ）方法不能打开工程资源管理器窗口。
A） 单击工具栏上的“工程资源管理器”按钮
B） 双击窗体或窗体上的控件
C） 按Ctrl＋R组合键
D） 执行“视图”菜单中的“工程资源管理器”命令
7. 在Visual Basic中，使用（ ）字符作为续行符。
A） ： B） ； C） ` D） _
8. Visual Basic中，工程软件的扩展名为（ ）。
A）vbp B）frm C）cls
D）bas
9. 下面哪一种变量名是错误的（ ）。
A）3abc B）a123 C）abc D）ab12％
10. 什么关键字声明的局部变量在整个程序运行中一直存在（ ）。
A）Dim B）Public C）Static
D）Private
11. 在Visual Basic 6.0中，字符串是被放在（ ）号内的若干个字符。
A）单引号 B）双引号 C）圆括号 D）花括号
12. （ ）种数据类型对小数点的位置有明确的位数限制。
A）浮点型 B）货币型 C）布尔型 D）对象型
13. 在窗体上画一个名称为Commandl的命令按钮和三个名称分别为Labell、Label2和
Label3的标签，然后编写如下代码：
PrivateaAsInteger
Private Sub Command1_C1ick()
Static b As Integer
Dim c As Integer
x＝5
b＝b + x
c＝c + x
a＝a + x
Label1.Caption＝a
Label2.Caption＝b
Label3.Caption＝c
End Sub
运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是（ ）。
A)555 B)151515 C)1515
5 D)51515
14. 下面哪一种变量的类型说明符的使用是正确的（ ）。
A）Dim a: a = 2000$
B）Dim a: a% = 90000
C）Dim a: a& = True
D）Dim a: a = “OK”
15. 标题栏中不允许出现的工作状态是（ ）。
A）设计阶段 B）运行阶段 C）中断阶段
D）调试阶段
主观题部分：
编程题（每题15分，共1题）
1、编程实现一个命令按钮command1的单击事件，单击该按钮后从键盘上输入若干学生的成绩，统计并输出最高分数和最低分数，当输入负数时结束输入。
《VB程序设计》作业（二）
本课程作业由两部分组成。第一部分为“客观题部分”，由15个选择题组成，每题1分，共15分。第二部分为“主观题部分”，由编程题组成，共15分。作业总分30分，将作为平时成绩记入课程总成绩。
客观题部分：
选择题（每题1分，共15题）
1. 当VB执行下面语句后，A的值为（ ）。
A=1
IF A>0 THEN A=A+1
IF A>1 THEN A=0
A）0 B）1 C）2 D）3
2. 当VB执行下面语句后，输出的结果是（）。
Private Sub Form_Click（）
score = Int(Rnd * 10) + 30
Select Case score
Case Is < 10
A$ = "F"
Case 10 To 19
A$ = "D"
Case 20 To 29
A$ = "C"
Case 30 To 39
A$ = "B"
Case Else
A$ = "A"
End Select
Print A$
End Sub
A） A B） B C） C D） D
3. 执行下面的程序段后，x 的值为( )。
x=2
Fori=1 To 10Step 3
x=x+i\2
Next i
A) 2 B) 4 C) 7 D)
9
4. 假定有以下循环结构：
Do Until 条件
循环体
Loop
则正确的描述是（ ）。
A) 如果“条件”是一个为0的常数，则一次循环体也不执行
B) 如果“条件”是一个为0的常数，则至少执行一次循环体
C) 如果“条件”是一个不为0的常数，则至少执行一次循环体
D) 不论“条件”是否为“真”，至少要执行一次循环体
5. 假定有以下程序段：
For i= 1 To 3
For j = 5 To 1 Step -1
Printi * j
Nextj , i
则语句“Printi * j ”的执行次数是（ ）。
A）20 B）24 C）15 D）18
6. 以下程序段的输出结果为（ ）。
x = 2
y = 8
Do Until y>8
x = x * y
y = y +1
Loop
Print x
A）2 B）9 C）10 D）16
7. 用下面的语句所定义的数组的元素个数是（ ）。
DimA（-3 To 5）As Integer
A）6 B）7 C）8 D）9
8. 阅读下面的程序段：
Fori=1 To 2
Forj=1 To i
For k=j To 2
x=x+1
Next k
Next j
Next i
执行上面的三重循环后，x的值为( )。
A) 3 B) 4 C) 5
D) 6
9. 在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Fori=1 To 3
x=2
Forj =1 To 2
x=4
Fork=1 To 3
x=x+5
Nextk
Nextj
Nexti
Printx
End Sub
程序运行后，单击命令按钮，输出结果是( )。
A) 11 B) 19 C) 57 D)
63
10. 在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，然后编写如下事件过程：
Private Sub Command1_Click()
x=1
Do While x<50
x=(x+1)*(x+2)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值分别为（ ）。
A) 1和0 B) 2和56 C) 3和 70
D) 4和168
11. 以下正确的叙述是（ ）。
A） Select Case语句中的测试表达式可以是任何形式的表达式
B） Select Case语句中的测试表达式只能是数值表达式或字符串表达式
C） 在执行Select Case语句时，所有Case子句均按出现的次序被顺序执行
页:
[1]