西电《VB程序设计》13春在线作业
试卷总分：100
单选题
一、单选题（共 25 道试题，共 100 分。）
V
1. 执行如下两条语句，窗体上显示的是() a=9.8596 Print Format(a,"$00,00.00")
A. 0,009.86
B. 9.86
C. 9.86
D. $0,009.86
此题选: D 满分：4 分
2. 以下关于MsgBox的叙述中，错误的是()
A. MsgBox函数返回一个整数
B. 通过MsgBox函数可以设置信息框中图标和按钮的类型
C. MsgBox语句没有返回值
D. MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量
此题选: D 满分：4 分
3. 以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是()
A. Form1.Name="VisualBasic窗体"
B. Form1.Title="VisualBasic窗体"
C. Form1.Caption="VisualBasic窗体"
D. Form1.Text="VisualBasic窗体”
满分：4 分
4. 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1 To 5 Sum = sum+a(i) Next i x=Sum/5 For i =1 To 5 If a(i) x Then Print a(i); Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是 (
A. 13
B. 14
C. 27
D. 19
此题选: D 满分：4 分
5. 在窗体上画一个名称为Command1的命令按钮，并编写如下程序： Private Sub Command1_Click() Dim x As Integer Static y As Integer x=10 y=5 Call f1(x,y) Print x,y End Sub Private Sub f1(ByRef x1 As Integer, y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是()
A. 10 5
B. 12 5
C. 10 7
D. 12 7
此题选: D 满分：4 分
6. 表的每一行就是一个（ ）；表中的每一列称作一个（ ），描述了它所含有的数据。
A. 记录 字段
B. 索引 字段
C. 字段 记录
D. 记录 索引
满分：4 分
7. 表达式4+5*7/8Mod9的值是()
A. 4
B. 5
C. 6
D. 7
满分：4 分
8. 双精度浮点数存储时占的字节数是()
A. 4
B. 8
C. 16
D. 32
满分：4 分
9. 表达式 5 Mod 3+3*2的值是()
A. 0
B. 2
C. 4
D. 6
满分：4 分
10. 选拔身高T超过1.7米且体重W小于62.5公斤的人，表示该条件的布尔表达式为()
A. T =1.7 And W =62.5
B. T =1.7 Or W =62.5
C. T 1.7 And W 62.5
D. T =1.7 Or W 62.5
满分：4 分
11. 设菜单中有一个菜单项为"Open"。若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行"Open"命令，则在菜单编辑器中设置“Open"命令的方式是()
A. 把Caption属性设置为 Open
B. 把Caption属性设置为O pen
C. 把Name属性设置为 Open
D. 把Name属性设置为O pen
满分：4 分
12. Sub过程与Function过程最根本的区别是()。
A. Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以。
B. Function过程可以有参数，Sub过程不可以。
C. 两种过程参数的传递方式不同。
D. Sub过程的过程名不能返回值，而Function过程能够通过过程名返回值。
此题选: D 满分：4 分
13. 阅读程序 Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum = 0 arr = Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3 = arr(i) Then Sum =Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输入结果为()
A. 13
B. 14
C. 27
D. 15
满分：4 分
14. 表达式2*3^2+2*8/4+3^2的值为()。
A. 64
B. 31
C. 49
D. 42
满分：4 分
15. 在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：以下能实现上述操作的程序段是()
A. Private Sub HScroll_Change() Text1.Text=HScroll1.Value End Sub
B. Private Sub HScroll_Click() Text1.Text=HScroll1.Value End Sub
C. Private Sub HScroll_Change() Text1.Text=HScroll.Caption
D. Private Sub HScroll_Click() Text1.Text=HScroll.Caption
满分：4 分
16. 以下叙述中错误的是()
A. 在KeyPress事件过程中不能识别键盘的按下与释放
B. 在KeyPress事件过程中不能识别回车键
C. 在KeyDown和KeyUp事件过程中，将键盘输入的"A"和"a"视作相同的字母
D. 在KeyDown和KeyUp事件过程中，从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符
满分：4 分
17. (5) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=InputBox("Input") Select Case x Case 1,3 Print "分支 1" Case Is 4 Print "分支 2" Case Else Print "Else 分支 " End Select End Sub 程序运行后，如果在输入对话框中输入2，则窗体上显示的是()
A. 分支1
B. 分支2
C. Else分支
D. 程序出错
满分：4 分
18. 执行以下程序段 a$="abbacddcba" For i=6 To 2 Step -2 X=Mid(a,i,i) Y=Left(a,i) z=Right(a,i) z=UCase(X Y z) Next i Print z 输出结果为()
A. 13
B. 14
C. 27
D. 18
满分：4 分
19. 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500,如图所示。编写如下程序： Private Sub Form_Load() Timer1.Enabled=False End Sub Private Sub Command1_Click() Timer1.Enabled=True End Sub
A. 13
B. 14
C. 27
D. 17
满分：4 分
20. 当一个复选框被选中时，它的Value属性的值是()
A. 3
B. 2
C. 1
D. 0
满分：4 分
21. 以下叙述中错误的是()
A. 事件过程是响应特定事件的一段程序
B. 不同的对象可以具有相同名称的方法
C. 对象的方法是执行指定操作的过程
D. 对象事件的名称可以由编程者指定
此题选: D 满分：4 分
22. 设有如下程序 Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer Dim n As Integer n=InputBox("输入数据") If n 10 Then Call GetArray(a,n) End If End Sub Private Sub GetArray(b() As Integer,n As Integer) Dim c(10) As Integer j=0 For i=1 To n b(i
A. 数组b中的偶数被保存在数组c中
B. 程序运行结束后，在窗体上显示的是c数组中元素的个数
C. GetArray过程的参数n是按值传送的
D. 如果输入的数据大于10，则窗体上不显示任何显示
满分：4 分
23. 下面程序段 For I=1 To 3 Step 1 Print Spc(5-I); For j=1 To 2*I-1 Print ＂*＂; Next j; Print Next I 运行结果为()
A. * * * ** * * * *
B. * * * * * * * * *
C. * * * * * * ** * * * *
D. * * * * * * * * *
满分：4 分
24. 下列符号不能作为VB中变量名的是()。
A. ABCDEFG
B. P00000
C. 89YWDDF
D. xyz
满分：4 分
25. 下面程序 x$=＂a＂ y$=＂b＂ z$=＂c＂ For I=1 to 2 X$=y$：y$=z$：z$=x$ Next I Print x$+y$+z$ 运行后的输出结果是()
A. cab
B. bca
C. bcb
D. cbc
此题选: D 满分：4 分
试卷总分：100
单选题
一、单选题（共 25 道试题，共 100 分。）
V
1. 执行如下两条语句，窗体上显示的是() a=9.8596 Print Format(a,"$00,00.00")
A. 0,009.86
B. 9.86
C. 9.86
D. $0,009.86
此题选: D 满分：4 分
2. 以下关于MsgBox的叙述中，错误的是()
A. MsgBox函数返回一个整数
B. 通过MsgBox函数可以设置信息框中图标和按钮的类型
C. MsgBox语句没有返回值
D. MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量
此题选: D 满分：4 分
3. 以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是()
A. Form1.Name="VisualBasic窗体"
B. Form1.Title="VisualBasic窗体"
C. Form1.Caption="VisualBasic窗体"
D. Form1.Text="VisualBasic窗体”
满分：4 分
4. 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1 To 5 Sum = sum+a(i) Next i x=Sum/5 For i =1 To 5 If a(i) x Then Print a(i); Next i End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是 (
A. 13
B. 14
C. 27
D. 19
此题选: D 满分：4 分
5. 在窗体上画一个名称为Command1的命令按钮，并编写如下程序： Private Sub Command1_Click() Dim x As Integer Static y As Integer x=10 y=5 Call f1(x,y) Print x,y End Sub Private Sub f1(ByRef x1 As Integer, y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是()
A. 10 5
B. 12 5
C. 10 7
D. 12 7
此题选: D 满分：4 分
6. 表的每一行就是一个（ ）；表中的每一列称作一个（ ），描述了它所含有的数据。
A. 记录 字段
B. 索引 字段
C. 字段 记录
D. 记录 索引
满分：4 分
7. 表达式4+5*7/8Mod9的值是()
A. 4
B. 5
C. 6
D. 7
满分：4 分
8. 双精度浮点数存储时占的字节数是()
A. 4
B. 8
C. 16
D. 32
满分：4 分
9. 表达式 5 Mod 3+3*2的值是()
A. 0
B. 2
C. 4
D. 6
满分：4 分
10. 选拔身高T超过1.7米且体重W小于62.5公斤的人，表示该条件的布尔表达式为()
A. T =1.7 And W =62.5
B. T =1.7 Or W =62.5
C. T 1.7 And W 62.5
D. T =1.7 Or W 62.5
满分：4 分
11. 设菜单中有一个菜单项为"Open"。若要为该菜单命令设计访问键，即按下Alt及字母O时，能够执行"Open"命令，则在菜单编辑器中设置“Open"命令的方式是()
A. 把Caption属性设置为 Open
B. 把Caption属性设置为O pen
C. 把Name属性设置为 Open
D. 把Name属性设置为O pen
满分：4 分
12. Sub过程与Function过程最根本的区别是()。
A. Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以。
B. Function过程可以有参数，Sub过程不可以。
C. 两种过程参数的传递方式不同。
D. Sub过程的过程名不能返回值，而Function过程能够通过过程名返回值。
此题选: D 满分：4 分
13. 阅读程序 Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum = 0 arr = Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i)/3 = arr(i) Then Sum =Sum+arr(i) End If Next i Print Sum End Sub 程序运行后，单击窗体，输入结果为()
A. 13
B. 14
C. 27
D. 15
满分：4 分
14. 表达式2*3^2+2*8/4+3^2的值为()。
A. 64
B. 31
C. 49
D. 42
满分：4 分
15. 在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图所示：以下能实现上述操作的程序段是()
A. Private Sub HScroll_Change() Text1.Text=HScroll1.Value End Sub
B. Private Sub HScroll_Click() Text1.Text=HScroll1.Value End Sub
C. Private Sub HScroll_Change() Text1.Text=HScroll.Caption
D. Private Sub HScroll_Click() Text1.Text=HScroll.Caption
满分：4 分
16. 以下叙述中错误的是()
A. 在KeyPress事件过程中不能识别键盘的按下与释放
B. 在KeyPress事件过程中不能识别回车键
C. 在KeyDown和KeyUp事件过程中，将键盘输入的"A"和"a"视作相同的字母
D. 在KeyDown和KeyUp事件过程中，从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符
满分：4 分
17. (5) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=InputBox("Input") Select Case x Case 1,3 Print "分支 1" Case Is 4 Print "分支 2" Case Else Print "Else 分支 " End Select End Sub 程序运行后，如果在输入对话框中输入2，则窗体上显示的是()
A. 分支1
B. 分支2
C. Else分支
D. 程序出错
满分：4 分
18. 执行以下程序段 a$="abbacddcba" For i=6 To 2 Step -2 X=Mid(a,i,i) Y=Left(a,i) z=Right(a,i) z=UCase(X Y z) Next i Print z 输出结果为()
A. 13
B. 14
C. 27
D. 18
满分：4 分
19. 在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签，两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500,如图所示。编写如下程序： Private Sub Form_Load() Timer1.Enabled=False End Sub Private Sub Command1_Click() Timer1.Enabled=True End Sub
A. 13
B. 14
C. 27
D. 17
满分：4 分
20. 当一个复选框被选中时，它的Value属性的值是()
A. 3
B. 2
C. 1
D. 0
满分：4 分
21. 以下叙述中错误的是()
A. 事件过程是响应特定事件的一段程序
B. 不同的对象可以具有相同名称的方法
C. 对象的方法是执行指定操作的过程
D. 对象事件的名称可以由编程者指定
此题选: D 满分：4 分
22. 设有如下程序 Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer Dim n As Integer n=InputBox("输入数据") If n 10 Then Call GetArray(a,n) End If End Sub Private Sub GetArray(b() As Integer,n As Integer) Dim c(10) As Integer j=0 For i=1 To n b(i
A. 数组b中的偶数被保存在数组c中
B. 程序运行结束后，在窗体上显示的是c数组中元素的个数
C. GetArray过程的参数n是按值传送的
D. 如果输入的数据大于10，则窗体上不显示任何显示
满分：4 分
23. 下面程序段 For I=1 To 3 Step 1 Print Spc(5-I); For j=1 To 2*I-1 Print ＂*＂; Next j; Print Next I 运行结果为()
A. * * * ** * * * *
B. * * * * * * * * *
C. * * * * * * ** * * * *
D. * * * * * * * * *
满分：4 分
24. 下列符号不能作为VB中变量名的是()。
A. ABCDEFG
B. P00000
C. 89YWDDF
D. xyz
满分：4 分
25. 下面程序 x$=＂a＂ y$=＂b＂ z$=＂c＂ For I=1 to 2 X$=y$：y$=z$：z$=x$ Next I Print x$+y$+z$ 运行后的输出结果是()
A. cab
B. bca
C. bcb
D. cbc
此题选: D 满分：4 分
版权声明
声明：有的资源均来自网络转载，版权归原作者所有，如有侵犯到您的权益
请联系本站我们将配合处理！
下一篇 : 14春华中师范大学《国家税收B》在线作业