题目
设有如下语句: Dim a,b As Integer c="VisualBasic" d=#7/20/2005# 以下关于这段代码的叙述中,错误的是()。
A.a被定义为Integer类型变量
B.b被定义为Integer类型变量
C.c中的数据是字符串
D.d中的数据是日期类型
第1题
设有如下数组声明语句:
Dim am(-2 To 2,0 To 3)As Integer
该数组包含的数组元素个数是
A)20
B)16
C)15
D)12
第2题
设有如下语句: Dim a,b As Integer c="Visual Basic" d=#7/20/2005# 以下关于这段代码的叙述中,错误的是______。
A.a被定义为Integer类型变量
B.b被定义为Integer类型变量
C.c中的数据是字符串
D.d中的数据是日期类型
第3题
设有如下变量声明语句:
Dim a,b As Boolean
则下面叙述中正确的是
A.a和b都是布尔型变量
B.a是变体型变量,b是布尔型变量
C.a是整型变量,b是布尔型变量
D.a和b都是变体型变量
第4题
设有如下语句:
Dim a,b As Integer
c="VisualBasic"
d=#7/20/2005#
以下关于这段代码的叙述中,错误的是()。
A.a被定义为Integer类型变量
B.b被定义为Integer类型变量
C.c中的数据是字符串
D.d中的数据是日期类型
第5题
A.a和b都是布尔型变量
B.a是变体型变量,b是布尔型变量
C.a是整型变量,b是布尔型变量
D.a和b都是变体型变量
第6题
A.a和b都是布尔型变量
B.a是变体型变量,b是布尔型变量
C.a是整型变量,b是布尔型变量
D.a和b都是变体型变量
第7题
设有命令按钮Command1的单击事件过程,代码如下: Private Sub Command1_Click() Dim a(30) As Integer For i=1 To 30 a(i)=Int(Rnd*100) Next For Each arrItem In a If arrItem Mod 7=0 Then Print arrItem If arrItem>90 Then Exit For Next End Sub 对于该事件过程,以下叙述中错误的是______。
A.a数组中的数据是20个100以内的整数
B.语句For Each arrItem In a有语法错误
C.If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数
D.If arrItem>90……语句的作用是当数组元素的值大于90时退出For循环
第8题
设有命令按钮Command1的单击事件过程,代码如下:
Private Sub Command1_Click()
Dim a(30)As Integer
For i=1 To 30
a(i)=Int(Rnd*100)
Next
For Each arrItem In a
If arrItem Mod 7=0 Then Print arrItem;
If arrItem>90 Then Exit For
Next
End Sub
对于该事件过程,以下叙述中错误的是()。
A.a数组中的数据是30个100以内的整数
B.语句For Each arrItem In a有语法错误
C.If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数
D.If arrItem>90……语句的作用是当数组元素的值大于90时退出For循环
第9题
设有声明语句 Option Base 1 Dim b(-1 To 2 To 20) As Integer
A.2310
B.1920
C.1500
D.165B
第10题
A.VB中不允许此形式的定义语句
B.与 Dim k As Integer 等价
C.与 Dim k As String 等价
D.与 Dim k As Variant 等价
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!