更多"下面命令的输出结果是 DECLARE a(10) a(0)"的相关试题:
[填空题]过程A2中的命令输出结果是 【9】 ，过程A1中的命令输出结果是 【10】 ，主程序A中的命令输出的结果是 【11】 。
A过程如下：
SET TALK OFF
A=0
B=0
DO A1
A，B
RETURN
A1过程如下：
PRIVATE A
A="Welcome1!”
B=“Yes”
DO A2
A，B
A2过程如下：
A，B
PRIVATE B
A=999
B=888
RETURN
[单项选择]下面程序运行后，单击命令按钮，输出的结果是 Pivate Sub Cornmand1_Click（ ） Dim a%(1 To 4)，b%(2 To 6)，i%，str1#，str2# For i=1 To 4 a(i)=i Next For i=2 To 6 b(i)=i Next str1=YAG(a) str2=YAG(b) Print"str1=";str1;"str2=";str2 End Sub Function YAG(a（ ）As Integer) Dim t#,i% t=1 For i=LBound(a)To UBound(a) t=t*a(i) Next YAG=t End Function
A. str1=24 str2=720
B. str1=12 str2=360
C. str1=24 str2=180
D. str1=36 str2=720
[填空题]下面运行程序后，单击命令按钮，输出的结果是 【9】 。
Private Sub Command1_Click（ ）
Dim a%(1 To 4)，b%(3 To 6)，i%，s1#，s2#
For i=1 To 4
a(i)=i
Next
For i=3 To 6
b(i)=i
Next
s1.= Fun(a)
s2 =Fun(b)
Print "s1 ="; s1; "s2 ="; s2
End Sub
Function Fun( a( ) As Integer)
Dim t#, i%
t=1
For i = LBound(a) To UBound(a)
t=t * a(i)
Next
Fun=t
End Function
[填空题]下面程序运行后，单击命令按钮，输出的结果是______。
Private Sub Command1_Click（ ）
Dim a%(1 To 5)，i%，s#
For i=1 To 5
a(i) =i
Next
s=Fun(a)
Print "s="；s；
End Sub
Function Fun(a（ ） As Integer)
Dim t#，i%
t=1
For i=LBound(a) To UBound(a)
t=t*a(i)
Next
Fun=t
End Function
[填空题]下面运行程序后，单击命令按钮，输出的结果是______。
Private Sub Commandl_clck（ ）
Dim a%(1 To 4)，b%(3 To 6)，i%，s1#，s2#
Fori=1 To 4
a(i)=i
Nexti
For i=3 To 6
b(i)=i
Nexti
s1=YAS(a)
S2=YAS(b)
Printt"s1="；S1"S2="；s2
End Sub
FunctionYAS(a（ ）AsInteger)
Dimt#，i%
t=1
For i=LBound(a)ToUBound(a)
t=t*a(i)
Nexti
YAS=t
End Funtoon
[填空题]下面运行程序后，单击命令按钮，输出的结果是______。
Private Sub Commandl_clck（ ）
Dim a%(1 To 4)，b%(3 To 6)，i%，s1#，s2#
Fori=1 To 4
a(i)=i
Nexti
For i=3 To 6
b(i)=i
Nexti
s1=YAS(a)
S2=YAS(b)
Printt"s1="；S1"S2="；s2
End Sub
FunctionYAS(a（ ）AsInteger)
Dimt#，i%
t=1
For i=LBound(a)ToUBound(a)
t=t*a(i)
Nexti
YAS=t
End Funtoon
[填空题]下面程序运行后，单击命令按钮，输出的结果是______。
Private Sub Command1_Click（ ）
Dim a%(1 To 5)，i%，s#
For i=1 To 5
A(i)=i
Next
S=Fun(a)
Print "s="；s；
End Sub
Function Fun(a（ ）As Integer)
Dim t#,i%
t=1
For i=LBound(a)To UBound(a)
t=t*a(i)
Next
Fun=t
End Function
[单项选择]下面程序输出的结果是什么 ( )
public class Quiz2
public static void main(String args[])
try throw new MyException（ ）；
catch(Exception e)
System.out.println("It’s caught!")；
finally
System.out.println("It’s finally caught!")；
class MyExeeption extends Exception
A. It’s finally caught!
B. It’s caught!
C. It’s caught!/It’sfinally caught!
D. 无输出
[单项选择]
连续执行以下命令，最后一条命令的输出结果是（）
SET EXACT OFF
a=“北京”
b=(a=“北京交通”)
b
A. 北京
B. 北京交通
C. ．F．
D. 出错
[单项选择]窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是( )。
Private Sub Command1_Click（ ）
Dim a
a=Array(1,2,3,4,5)
For k=1 To 4
S=s+a(k)
Next k
Print s
End Sub
A. 10
B. 14
C. 15
D. 120
