浙江师范大学《Visual Basic程序设计基础》考试卷.doc

浙江师范大学《Visual Basic程序设计基础》考试卷
(2007----2008学年第 2 学期)
考试形式笔试(闭卷) 使用学生全校07级理科(非行知)专业
考试时间 120 分钟出卷时间 2008 年 6 月 1 日
说明:考生应将全部答案写在答题纸上,否则作无效处理。
试题一(每小题2分,共10分)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】
过程JiSuan用于计算e = 1 + 1/1! + 1/2! + 1/3! + …+1/n!的值,(),并用消息框显示结果。
【程序】
Option Explicit
Private Sub JiSuan()
Dim e As single, (1) , i As long
e = 1: t = 1: (2)
(3)
i = i + 1: e = e + t: (4)
Loop
(5)
End Sub
【供选择的答案】
A、t As String B、Dim t As String C、Dim t As Single D、t As Single
A、i = 1 B、i = 2 C、i = 0 D、i = 3
A、While t >= B、Do While t >=
C、While e >= D、Do While e >=
A、t = t * i B、t = 1/(i * t) C、t = t / i D、t = 1 / i
A、MsgBox "近似值为:" + t
B、MsgBox "近似值为:" & t
C、MsgBox "近似值为:" + e
D、MsgBox "近似值为:" & e
试题二(每小题2分,共8分)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】
程序界面如下图所示,程序运行时要求有以下功能:
单击“加粗”复选框(Check1),若复选框被选中,则设置标签(Label1)上显示的文字为加粗,否则设置为不加粗。
单击“选择颜色”mand1)将显示“颜色”对话框,若单选按钮“前景色”(Option1)被选中,则设置Label1的前景色为用户选择的颜色,否则设置Label1的背景色为用户选择的颜色。monDialog1。
【程序】
Private Sub Check1_Click()
= False
If (6) Then = True
End Sub
Private mand1_Click()
Dim c As Long : (7) : c = (8)
If (9) Then = c Else = c
End Sub
【供选择的答案】
A、 = True B、 = False
C、 = 1 D、 = 0

= 1


A、 B、 = 1
C、 = false D、 = 0
试题三(每小题2分,共10分)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】

程序界面如上面两图所示,程序运行时要求有以下功能:
当用户单击“增加”mand1),若文本框(Text1)中的内容不为空,则将文本框中的内容添加到列表框末尾,并自动将文本框中的内容选中。
当用户单击“删除”mand2),若列表框中没有表项被选中,则用消息框提示“没有选择表项”,否则删除被选中的表项。
文本框仅允许输入数字字符与退格字符(ASCII码值为8)。
【程序】
Private mand1_Click()
Dim s As String, t As String
s =
If s = "" Then Exit Sub
(10) :