首页
题库
网课
在线模考
桌面端
登录
搜标题
搜题干
搜选项
0
/ 200字
搜索
单项选择题
设有如下数组定义语句: Dim a(-1 To 4,3)As Integer 以下叙述中正确的是
A.a数组有1 8个数组元素
B.a数组有20个数组元素
C.a数组有24个数组元素
D.语法有错
点击查看答案&解析
在线练习
手机看题
你可能感兴趣的试题
单项选择题
假定建立了一个名为Command1的命令按钮数组,则以下说法中错误的是
A.数组中每个命令按钮的名称(Name属性)均为Command1
B.数组中每个命令按钮的标题(Caption属性)都一样
C.数组中所有命令按钮可以使用同一个事件过程
D.用名称Command1(下标)可以访问数组中的每个命令按钮
点击查看答案&解析
手机看题
单项选择题
列表框中的项目保存在一个数组中,这个数组的名字是
A.Column
B.Style
C.List
D.MultiSelect
点击查看答案&解析
手机看题
单项选择题
以下数组定义语句中,错误的是
A.Static(10)As Integer
B.Dim c(3,1 To 4)
C.Dim d(-10)
D.Dim b(0 To 5,1 To 3)As Integer
点击查看答案&解析
手机看题
单项选择题
下面的语句用Array函数为数组变量a的各种元素赋值整数值:
A.Dim a
B.Dim a As Integer
C.Dim a(9)As Integer
D.Dim a()As Integer
点击查看答案&解析
手机看题
单项选择题
语句Dim a(-3 To 4,3 To 6)As Integer定义的数组的元素个数是
A.18
B.28
C.21
D.32
点击查看答案&解析
手机看题
单项选择题
设有如下数组定义语句: Dim a(-1 To 4,3)As Integer 以下叙述中正确的是
A.a数组有1 8个数组元素
B.a数组有20个数组元素
C.a数组有24个数组元素
D.语法有错
点击查看答案&解析
手机看题
单项选择题
语句DimArr(-2 To 4)As Integer所定义的数组的元素个数为
A.7个
B.6个
C.5个
D.4个
点击查看答案&解析
手机看题
单项选择题
下面正确使用动态数组的是
A.Dim art() As Integer…ReDim art(3,5)
B.Dim ar()As Integer…ReDim art(50)As String
C.Dim ar()…ReDim art(50)As Integer
D.Dim art(50)As Integer…ReDim arr(20)
点击查看答案&解析
手机看题
单项选择题
下列数组定义中错误的是
A.Dim a(-5 To -3)
B.Dim a(3 To 5)
C.Dim a(-3 To -5)
D.Dim a(-3 To 3)
点击查看答案&解析
手机看题
单项选择题
以下关于数组的叙述中,错误的是
A.Variant类型的数组中各数组元素的类型可以不同
B.各数组元素可以是不同类型的控件
C.各数组元素通过下标进行区别
D.各数组元素具有相同的名称
点击查看答案&解析
手机看题
单项选择题
设有如下声明语句 Option Base1 Dim arr(2,-1 To 5)As Integer 则数组arr中数组元素的个数是
A.10
B.12
C.14
D.21
点击查看答案&解析
手机看题
单项选择题
以下叙述中错误的是
A.用ReDim语句可以改变数组的维数
B.用ReDim语句可以改变数组的类型
C.用ReDim语句可以改变数组每一维的大小
D.用ReDim语句可以对数组中的所有元素置0或空字符串
点击查看答案&解析
手机看题
单项选择题
设有下面的程序段: X=InputBox("请输入一个整数") ReDim a(x) For k=x To 0 Step -1 a(k)=k Next k 一般,在这段程序之前应先进行数组a的定义。下面定义语句中正确的是
A.Dim a(100)As Integer
B.Dim a()As Integer
C.Dim a As Integer
D.Dim a(0 To 100)As Integer
点击查看答案&解析
手机看题
单项选择题
如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是
A.Dim a(4)As Imeger
B.Dim a(5)As Variant
C.Dim a(1 To 5)As Integer
D.Dim a As Variant
点击查看答案&解析
手机看题
单项选择题
设有如下一段程序: Private Sub Command1_Click() Static a As Variant a=Array("one","two","three","four","five") Print a(3) End Sub 针对上述事件过程,以下叙述中正确的是
A.变量声明语句有错,应改为Static a(5)As Variant
B.变量声明语句有错,应改为Static a
C.可以正常运行,在窗体上显示three
D.可以正常运行,在窗体上显示four
点击查看答案&解析
手机看题
单项选择题
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim n()As Integer:Dim a,b As Integer a=InputBox("Enter the first number") b:InputBox("Enter the second number") ReDim n(a To b) For k=LBound(n)To UBound(n) n(k)=k Print n(k); Next k End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入2和3,输出结果为
A.1 2
B.2 3
C.3 4
D.4 5
点击查看答案&解析
手机看题
单项选择题
1个二维数组可以存放1个矩阵,在程序开始有语句Option Base0,则下面定义的数组中正好可以存放1个4(3矩阵(即只有12个元素))的是
A.Dim a(-2 To 0,2)As Integer
B.Dim a(3,2)As Integer
C.Dim a(4,3)As Integer
D.Dim a(-1,To-4,-1 To -3)As Integer
点击查看答案&解析
手机看题
单项选择题
默认情况下,下面声明的数组的元素个数是 Dim a(5,-2 To 2)
A.20
B.24
C.25
D.30
点击查看答案&解析
手机看题
单项选择题
设程序中有如下数组定义和过程调用语句: Dim a(10)As Integer Call p(a) 如下过程定义中,正确的是
A.Private Sub p(a As Integer)
B.Private Sub p(a() As Integer)
C.Private Sub p(a(10)As Integer)
D.Private Sub p(a(n)As Integer)
点击查看答案&解析
手机看题
单项选择题
在程序中要使用Array函数给数组arr赋初值,则以下数组变量定义语句中错误的是
A.Static arr
B.Dim arr(5)
C.Dim arr()
D.Dim arr As Vailant
点击查看答案&解析
手机看题
单项选择题
有下面程序代码: Private Sub Command1_Click() a=Array(1,2,3,4,5,6,7,8,9,10) n=UBound(a) For k=0 To UBound(a)/2 Print a(k)*a(n);:n=n-1 Next k End Sub 程序运行后,单击命令按钮Command1,输出结果是
A.26 12 20 30
B.2 12 20 56 90
C.30 28 24 18 10
D.10 18 24 28 30
点击查看答案&解析
手机看题
单项选择题
有下面程序代码: Option Base1 Private Sub Command1_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") For k=l To Len(x) b=Mid(x,k,1) a(Val(b)+1)=a(Val(b)+1)+1 Next k For k=1 To 10 Print a(k): Next k End Sub 程序运行时,单击命令按钮Command1,输入2355270224,则输出是
A.1 0 4 1 1 2 0 1 0 0
B.0 4 1 1 2 0 1 0 0 0
C.2 3 5 5 2 7 0 2 2 4
D.4 2 2 0 7 2 5 5 3 2
点击查看答案&解析
手机看题
单项选择题
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m=InputBox("请输入一个正整数") ReDim a(m) End Sub Private Sub Command2 Click() m=InputBox("请输入一个正整数") ReDim a(m)End Sub 运行程序时,单击Command1后输入整数10,再单击Command2后输入整数5,则数组a中元素的个数是
A.5
B.6
C.10
D.11
点击查看答案&解析
手机看题
单项选择题
在窗体上画一个名为Command1的命令按钮,然后编写以下程序: Private Sub Command1_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k x=8 Print M(2+M(x)) End Sub 运行程序,单击命令按钮,在窗体上显示的是
A.6
B.5
C.7
D.8
点击查看答案&解析
手机看题
单项选择题
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(10) For i=6 To 10 arr(i)=i-5 Next i Label1.Caption=arr(0)+arr(arr(10)/arr(6)) End Sub 运行程序,单击命令按钮,则在标签中显示的是
A.0
B.1
C.2
D.3
点击查看答案&解析
手机看题
单项选择题
在窗体上画一个名称为Text1的文本框,并编写如下程序: Option Base1 Private Sub Form Click() Dim arr Dim Start As Integer,Finish As Integer Sum As Integer arr=Array(12,4,8,16) Start=LBound(arr) Finish=UBound(arr) Sum=0 For i=Start To Finish Sum=Sum+arr(i) Next i c=Sum/Finish Text1.Text=c End Sub 运行程序,单击窗体,则在文本框中显示的是
A.40
B.10
C.12
D.16
点击查看答案&解析
手机看题
单项选择题
以下过程的功能是从数组中寻找最大值: Pfivate Sub FindMax(a() As Integer,ByRef Max As Integer) Dim S As Integer,f As Integer:Dim i As Integer s=LBound(a):f=UBound(a) Max=a(s) For i=S To f Ifa(i)>Max Then Max=a(i) Next End Sub 以下关于上述过程的叙述中,错误的是
A.语句Call FindMax(a,m)可以调用该过程,其中的a是数组,m是Integer类型变量
B.For循环次数等于a数组的元素数
C.过程末尾应该增加一条返回最大值的语句FindMax=Max
D.参数Max用于存放找到的最大值
点击查看答案&解析
手机看题
单项选择题
窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base1 Private Sub Command1_Click() Dim a%(3,3) For i=l To 3 For i=l To 3 Ifi>1 And{>1 Then a(i,j)=a(a(i-1,j-1),a(i,j-1))+1 Else a(i,j)=i*j End If Next Next Print a(2,2);a(3,3) End Sub 运行程序,单击命令按钮,窗体上显示的是
A.1 3
B.2 1
C.2 2
D.3 3
点击查看答案&解析
手机看题
单项选择题
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下: Option Base1 Private Sub Command1_Click() Dim a(4,4)As Integer For i=1 To 4 Forj=1 To 4 a(i,j)=Int(Rnd宰100) Next Next x=a(1,1)y=a(1,1) For i=1 To 4 For i=1 To 4 Ifx
a(i,j)Then y=a(i,j) Next s=s+a(i,i) Next Print x,y,s End Sub 关于以上程序,以下叙述中错误的是
A.二维数组元素的值是不大于99的随机整数
B.计算结果X是二维数组各元素中的最大数
C.计算结果y是二维数组各元素中的最小数
D.计算结果s是二维数组各行第一个元素之和
点击查看答案&解析
手机看题
单项选择题
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For Input As #1 Open"c:\f2.txt"For OutputAs #2 Do While Not EOF(2) Line Input #1,str1 Print #2,str1 Loop Close Kill"c:\f1.txt" End Sub 该程序运行时发生错误,应该进行的修改是
A.打开f1.txt应该使用Output方式,打开t2.txt应该使用Input方式
B.Not EOF(2)应该改为Not EOF(1)
C.Line Input应改为Get
D.Close语句改为Close AIl
点击查看答案&解析
手机看题
微信扫码免费搜题