更多"有如下过程代码: Sub var_dim( ) Static "的相关试题:
[单项选择]有如下过程代码: Sub var_dim( ) Static numa As Integer Dim numb As Integer numa=numa+2 numb=numb+1 print numa;mumb End Sub 连续3次调用var_dim.过程,第3次调用时输出的是()
A. 2 1
B. 2 3
C. 6 1
D. 6 3
[判断题]End Sub是Sub过程的最后一条语句,它指出过程结束并返回到调用该过程的代码段。
[单项选择]设有命令按钮 Command1 的单击事件过程,代码如下:
Private Sub Command1_Click( ) Dim a(3,3) As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i) Next i
Print Sum
End Sub
运行程序,单击命令按钮,输出结果是______。
A. 20
B. 7
C. 16
D. 17
[单项选择]
设有命令按钮 Command1 的单击事件过程,代码如下:
Private Sub Command1_Click( ) Dim a(3,3) As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=i*j+i
Next j
Next i
Sum=0
For i=1 To 3
Sum=Sum+a(i,4-i) Next i
Print Sum
End Sub
运行程序,单击命令按钮,输出结果是()。
A. 20
B. 7
C. 16
D. 17
[单项选择]阅读程序:
Function Fun(a As Integer)
Static c,
b=0:b=b+2:c=c+2
F=a*b*c
End Function
Private Sub Command1_Click( )
Dim a As Integer
a=2
For i=1 To 2
Print Fun(a);
Next
End Sub
运行上面的程序,单击命令按钮,输出结果为
A. 8 16
B. 9 18
C. 10 20
D. 7 14
[单项选择]有如下程序:
Function F(a As Integer)
b=0
Static c
b=b+1
c=c+2
F=a+b+c
End Function
Private Sub Command1_Click( )
Dim a As Integer
a=2
For i=1 To 3
Print F(
A. :
[单项选择]阅读程序: Function Fun(a As Integer) Static C b=0:b=b+2:c=c+2 F=a*b*c End Function Private Sub Command1_Click( ) Dim a As Integer a=2 For i=1 To 2 Print Fun(A) ; Next End Sub 运行上面的程序,单击命令按钮,输出结果为
A. 8 16
B. 9 18
C. 10 20
D. 7 14
[单项选择]在代码中定义了—个子过程: Sub P(a,b) ... End Sub 下面调用该过程的格式是正确的。
A. Call P
B. Call P 10,20
C. Call P(10,20)
D. P(10,20)
[单项选择]设有如下过程:
Sub ff(x,y,z,)
x=y+z
End Sub
以下所有参数的虚实结合都是传址方式的调用语句是( )。
A. 12
B. 13
C. 14
D. 15