(26)VBA中不能进行错误处理的语句结构是
A)On Error Then 标号
B)On Error Goto 标号
C)On Error Resume Next
D)On Error Goto 0
(27)执行语句:MsgBox "AAAA",vbOKCancel+vbQuestion,"BBBB"之后,弹出的信息框
A)标题为"BBBB"、框内提示符为"惊叹号"、提示内容为"AAAA"
B)标题为"AAAA"、框内提示符为"惊叹号"、提示内容为"BBBB"
C)标题为"BBBB"、框内提示符为"问号"、提示内容为"AAAA"
D)标题为"AAAA"、框内提示符为"问号"、提示内容为"BBBB"
(28)已知程序段:
s = 0
For i = 1 To 10 Step 2
s = s + 1
i = i * 2
Next i
当循环结束后,变量i和s的值分别为______
A)10 4
B)11 3
C)22 3
D)16 4
(29)以下内容中不属于VBA提供的数据验证函数的是
A)IsText
B)IsDate
C)IsNumeric
D)IsNull
(30)给定日期DD,可以计算该日期当月最大天数的正确表达式是
A)Day(DD)
B)Day(DateSerial(Year(DD),Month(DD),day(DD)))
C)Day(DateSerial(Year(DD),Month(DD),0))
D)Day(DateSerial(Year(DD),Month(DD)+1,0))
(31)假定有以下两个过程:
Sub S1(ByVal x As Integer, ByVal y As Integer)
Dim t As Integer
t = x
x = y
y = t
End Sub
Sub S2(x As Integer, y As Integer)
Dim t As Integer
t = x
x = y
y = t
End Sub
则以下说法中正确的是
A)用过程S1可以实现交换两个变量的值的操作,S2不能实现
B)用过程S2可以实现交换两个变量的值的操作,S1不能实现
C)用过程S1和S2都可以实现交换两个变量的值的操作
D)用过程S1和S2都不能实现交换两个变量的值的操作
(32)在窗体中有一个命令按钮Command1,编写事件代码如下:
Private Sub Command1_Click()
Dim s As Integer
s = P(1)+P(2) +P(3) +P(4)
debug.Print s
End Sub
Public Function P(N As Integer)
Dim Sum As Integer
Sum = 0
For i = 1 To N
Sum = Sum + i
Next i
P = Sum
End Function
打开窗体运行后,单击命令按钮,输出结果是
A)15 B)20 C)25 D)35
(33)在窗体中有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:
Private Sub Command1_Click()
For I =1 To 4
x = 3
For j = 1 To 3
For k = 1 To 2
x = x + 3
Next k
Next j
Next I
Text1.value = Str(x)
End Sub
打开窗体运行后,单击命令按钮,文本框Text1输出的结果是
A)6 B)12 C)18 D)21
(34)在窗体中有一个命令按钮run35,对应的事件代码如下:
Private Sub run35_Enter( )
Dim num As Integer
Dim a As Integer
Dim b As Integer
Dim i As Integer
For i= 1 To 10
num = InputBox("请输入数据:", "输入",1)
If Int(num/2) = num/2 Then
a = a + 1
Else
b = b + 1
End If
Next i
MsgBox("运行结果:a=" & Str(a) &",b=" & Str(b))
End Sub
运行以上事件所完成的功能是
A)对输入的10个数据求累加和
B)对输入的10个数据求各自的余数,然后再进行累加
C)对输入的10个数据分别统计有几个是整数,有几个是非整数
D)对输入的10个数据分别统计有几个是奇数,有几个是偶数
(35)以下是宏m的操作序列设计:
条件 操作序列 操作参数
MsgBox消息为"AA"
[tt]>1 MsgBox消息为"BB"
… MsgBox消息为"CC"
现设置宏m为窗体"fTest"上名为"bTest"命令按钮的单击事件属性,打开窗体"fTest"运行后,在窗体上名为"tt"的文本框内输入数字1,然后单击命令按钮bTest,则
A)屏幕会先后弹出三个消息框,分别显示消息"AA"、"BB"、"CC"
B)屏幕会弹出一个消息框,显示消息"AA"
C)屏幕会先后弹出两个消息框,分别显示消息"AA"和"BB"
D)屏幕会先后弹出两个消息框,分别显示消息"AA"和"CC"
北京 | 天津 | 上海 | 江苏 | 山东 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
广东 | 河北 | 湖南 | 广西 | 河南 |
海南 | 湖北 | 四川 | 重庆 | 云南 |
贵州 | 西藏 | 新疆 | 陕西 | 山西 |
宁夏 | 甘肃 | 青海 | 辽宁 | 吉林 |
黑龙江 | 内蒙古 |