题目内容（请给出正确答案）

[单选]

⽤Dim A (1 to 15) As Integer语句定义的数组的元素个数是()。

A、14

B、15

C、16

D、17

查看答案

更多“⽤Dim A (1 to 15) As Inte…”相关的问题

第1题

下列数组声明正确的是()。

A、t=15 : Dim a (1 to t) as integer

B、Dim a(15) as integer : ReDim a(1 to t)

C、Dim a(t) as single : ReDim a(3,6) as integer

D、Dim a() as integer : t=15 : ReDim a(1 to t) as integer

点击查看答案

第2题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编
写如下事件过程：
Private Sub Command1_Click()
Dim array1(10, 10) As Integer
Dim i As Integer, j As Integer
For i = 1 To 3
for j = 2 To 4
array1(i, j) = i + j
next j
next i
Text1.Text = arrry1(2, 3) + array(3, 4)
End Sub
程序运行后，单击命令按钮，在文本框中显示的值是______

A、12

B、13

C、14

D、15

点击查看答案

第3题

下列数组声明正确的是()。

A、r=8 : Dim a (1 to r) as integer

B、Dim a(10) as integer : ReDim a(1 to x)

C、Dim a(x) as single : ReDim a(3,6) as integer

D、Dim a() as integer : x=8 : ReDim a(1 to x) as integer

点击查看答案

第4题

下列数组声明正确的是()。

A、n=5 : Dim a (1 to n) as integer

B、Dim a(10) as integer : ReDim a(1 to 12)

C、Dim a() as single : ReDim a(3,6) as integer

D、Dim a() as integer : n=5 : ReDim a(1 to n) as integer

点击查看答案

第5题

下列数组声明正确的是()。

A、n=6 : Dim a (1 to n) as integer

B、Dim a(10) as integer : ReDim a(1 to 12)

C、Dim a() as single : ReDim a(3,6) as integer

D、Dim a() as integer : n=6 : ReDim a(1 to n) as integer

点击查看答案

第6题

代码段如下：dim N as integerN = 2N = N + 1Print N以上代码执行后，输出结果为（）

A、1

B、2

C、3

D、4

点击查看答案

第7题

运行下列程序：Dim bPrivate Sub Form_Click（)a = 1: b = 1Call fun1（a)Print "X = &quo

运行下列程序：
Dim b
Private Sub Form_Click()
a = 1: b = 1
Call fun1(a)
Print "X = "; a; ",Y = "; b
End Sub
Private Sub fun1(a)
b = 2 * a
a = 3 * b
End Sub
单击窗体后，则在窗体上显示的结果是()。
A.X = 1，Y = 1
B.X = 2，Y = 6
C.X = 6，Y = 2
D.X = 6，Y = 1

点击查看答案

第8题

用Dim a（－1 to 5 )定义一个一维数组，该数组中元素个数是6。（)

是

否

点击查看答案

第9题

数组声明语句dim a（5) as integer 声明的数组a下标最小的元素是a（1).用于循环次数已知。（)

是

否

点击查看答案

第10题

运行下列程序：Private Sub Form_Click（)Dim a As Integera = 1For i = 1 To 5Call fun1（a)Ne

运行下列程序：
Private Sub Form_Click()
Dim a As Integer
a = 1
For i = 1 To 5
Call fun1(a)
Next i
Print a
End Sub
Private Sub fun1(x)
y = 2
Do
x = x + y
Loop Until x ＞ 10
End Sub
单击窗体后，则在窗体上显示的结果是()。
A.5
B.1 2 3 4 5
C.19
D.7

点击查看答案

搜题

如果结果不匹配，请联系老师获取答案