2012-2013学年第二学期“计算机程序设计基础 Visual Basic”练习题
A. A = Inputbox(\请输入\正整数\，\应用示例\，\B. A = Inputbox(\应用示例\请输入\正整数\，\C. A = Inputbox(\，\应用示例\请输入\正整数\D. A = Inputbox(\请输入正整数\，\应用示例\，\17. 显示如下图所示的输出框语句是【 】。
A. Msgbox \注意\在这里书写消息内容\B. Msgbox \注意\在这里书写消息内容\C. Msgbox \在这里书写消息内容\，3, \注意\D. Msgbox \在这里书写消息内容\，2, \注意\18. 下列正确的赋值语句是【 】。
A. txt1.text + txt2.text = txt2.text B. Command1.Name = cmdOK C. 12Label.Caption = 1234
Private Sub Command1_Click() A = Inputbox(\请输入第一个数\B = Inputbox(\请输入第二个数\Print A + B End Sub
程序运行后，单击命令按钮，先后在输入框中分别输入123,321，则在窗体上输出【 】。 A. 444
B. 321123
C. 123321
D. 132231
D. A = inputbox(Hello)
19. 设窗体上有一个命令按钮Command1，其Click事件过程如下：
20. 设窗体上有一个命令按钮Command1，其Click事件过程如下：
程序运行后，三次单击命令按钮，分别在输入框中输入1,2，3，则在文本框Text1中 显示的内容是【 】。 A. 3
B. 123
C. 1
D. 1 2 3
二、程序填空题
1. 窗体上有一个名称为Command1的命令按钮，要求在该按钮上显示“VB程序设计”，则正 确的赋值语句是 。
2. 在VisualBasic程序中，显示一个内容为“thisisatest!”消息框的语句是 。 3. 下列语句的输出结果是 。
Print Format(Int(12345.6789 * 100 + 0.5) / 100, \
4. 下面事件过程实现，运行时单击窗体，从键盘输入两个变量的值，交换这两个变量的值， 并将交换后的结果显示在窗体上。
第 16 页 共 85 页
2012-2013学年第二学期“计算机程序设计基础 Visual Basic”练习题 Private Sub Form_Click() Dim a As Double, b AS Double A = Val(Inputbox(\请输入a \B = Val(Inputbox(“\请输入b \C = A = B =
Print \End Sub
5. 以下代码实现：运行时单击窗体，在窗体上打印如下图形。
Private Sub Form_Click() Print Tab(10); \Print Tab( Print Tab( Print Tab( Print Tab( End Sub
6. 以下代码实现：运行时每次单击窗体，均使窗体向右移动100缇。
Private Sub Form_Load() Form1.Left=0 End Sub
Private Sub Form_Click()
Intleft As Integer
Intleft = Form1. End Sub
+ 100 = Intleft ); \); \); \); \
); \); \); \); \
三、写出程序或程序段的执行结果
1.执行以下过程后，求窗体上显示的结果。
Private Sub Command1_Click() i = 7
Print i + 1; i + 2 End Sub
2.执行以下的程序代码后，求打印输出的结果。
Dim a As String, b As String, c As String a = \b = Mid(a, 2, 7)
第 17 页 共 85 页
2012-2013学年第二学期“计算机程序设计基础 Visual Basic”练习题
c = Right(b, 3) Print c
3.判断以下程序段的执行结果。
a = 4: b = 5 c = a = b Print a; b; c
4.在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为 Text1、Label1 和 Command1，然后编写如下两个事件过程：
Private Sub Command1_Click() s = InputBox(\请输入\Text1.Text = s End Sub
Private Sub Text1_Change()
Label1.Caption = Right(Trim(Text1.Text), 3) End Sub
程序运行后，单击命令按钮，若在输入对话框中输入abcdef，判断标签中显示的结果。
第 18 页 共 85 页
2012-2013学年第二学期“计算机程序设计基础 Visual Basic”练习题
第5章 Visua1 Basic控制结构
1. 下面【 】不是结构化程序设计的基本结构。
A．层次结构 B．循环结构 C．选择结构 D．顺序结构 2.结构化程序设计的三种基本结构的共同特点是【 】。
A．不能嵌套使用 B．只能用来写简单的程序
D．只有一个入口和一个出口 C．有多个入口和多个出口
3．下面结构图中是当型循环结构的是【 】。
True
A
e
False
A
B
A
eFalseTrue
e
True False
D
A B
4. 下列程序执行的结果为【 】。
x = 25: y = 20: z = 7
Print \A. Q ( 47 )
B. Q ( 165 )
C
C. Q ( 25+7*20 ) D. Q ( 87 )
5. 运行下列程序段后，显示的结果为【 】。
p1 = 63
p2 = 36
If p1 > p2 Then Print p2 Else Print p1 A. 63
B. 36
C. 55
D. 99
6. 以下程序段运行时从键盘上输入字符“+”，则输出结果为【 】。
Dim op As String
op = InputBox(\If op = \If op = \Print x A. 1
B. -1
C. 0
D. +1
7. 下列程序段的执行结果为【 】。
a = 75
If a > 60 Then I = 1 If a > 70 Then I = 2 If a > 80 Then I = 3 If a < 90 Then I = 4 Print \A. I＝1
B. I＝2
C. I＝3
第 19 页 共 85 页
D. I＝4
2012-2013学年第二学期“计算机程序设计基础 Visual Basic”练习题
8. 执行下列程序，单击命令按钮后，从键盘分别输入5和7，则输出结果为【 】。
Private Sub Command1_Click() x = InputBox(\请输入x的值\y = InputBox(\请输入y的值\s = x
If x < y Then s = x Print s * s End Sub A. 5 9. 计算分段函数
6
5
Y=
4 3
B. 7 x<0 0≤x<1 1≤x<2 x≥2
C. 25
D. 49
下面程序段中正确的是【 】。 A. If x < 0 Then y = 6 If x < 1 Then y = 5 If x < 2 Then y = 4 If x > 2 Then y = 3 C. If x < 0 Then
y = 6 ElseIf x > 0 Then y = 5 ElseIf x > 1 Then y = 4 Else y = 3 End If
10. 下列Visual Basic程序段错误是【 】。
If a > 5 Then a = a + 3 ElseIf b > 5 Then a = a – 5
A. 没有定义变量的初始值 C. If条件式中不能使用比较运算符 11. 有如下程序段：
A = 1: B = 2: C = 3 If B > 1 Then
B. 变量名称没有意义 D. 没有成对的End If B. If x >= 2 Then y = 3 If x >= 1 Then y = 4 If x > 0 Then y = 5 If x < 0 Then y = 6 D. If x >= 2 Then
y = 3 ElseIf x >= 1 Then
y = 4 ElseIf x >= 0 Then
y = 5 Else
y = 6 End If
第 20 页 共 85 页
百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库2013版VB练习题13_4_15_pdf(4)在线全文阅读。
相关推荐：