更多"单击一次命令按钮之后,窗体中的输出结果为______ 。 Priva"的相关试题:
[单项选择]单击一次命令按钮之后,下列程序代码的执行结果为
private Sub Command1_Click( )
S=P(1) +P(1)+P(2)+P(3)+P(4)
Print S:
End Sub
Public Function P(N As Integer)
Static Sum
For I=1 To n
Sum=Sum+I
Next 1
P=Sum
End Function
A. 20
B. 35
C. 115
D. 135
[单项选择]单击一次命令按钮后,下列程序的执行结果为
Private Sub Command1_Click( )
Dim m As Integer,I As Integer,x(10) As Integer
For I=0 To 4:x(I)=I+1:Next I
For I=1 TO 2:Call Prioc(x):Next I
For I=0 TO 3:Print x(I);:Next I
End Sub
Private Sub Prioc(a( )As Integer)
Static I As Integer
Do
a(I)=a(I)+a(I+1)
I=I+1
Loop While I<2
End Sub
A. 3 4 7 5
B. 3 5 7 4
C. 1 2 3 4
D. 1 2 3 5
[单项选择]单击一次命令按钮后,下列程序的执行结果为( )。
Private Sub Command1_Click( )
Dim m As Integer,I As Integer,x(10) As Integer
For I=0 To 4:x(I)=I+1:Next I
For I=1 TO 2:Call Prioc(x):Next I
For I=0 TO 3:Print x(I);:Next I
End Sub
Private Sub Prioc(a( )As Integer)
Static I As Integer
Do
a(I)=a(I)+a(I+1)
I=I+1
Loop While I<2
End Sub
A. private
B. 无修饰符
C. public
D. protected
[单项选择]单击一次命令按钮后,下列程序的执行结果是() Private Sub Command1_Click( ) s=P(1) + P(2) + P(3) + P(4) Print s End Sub Public Function P(N As Integer)Static Sum For i=1 To N Sum=Sum + i Next iP=Sum End Function
A. 15
B. 25
C. 35
D. 45
[单项选择]命令按钮Command1的单击事件过程如下:
Private Sub Command1_Click( )
Dim a( 10, 10)As Integer
x=0
For i = 1 To 3
For j = 1 To 3
a(i, j) =i * 2 Mod j
If x<a(i, j)Then x=a(i, j)
Next
Next
Print x
End Sub
执行上述事件过程后,窗体上显示的是( )。
A. 1
B. 2
C. 3
D. 4
[填空题]单击窗体上的命令按钮Command1, 【10】
Private Sub Command1_Click( )
a= "10"
b=20
c=Val(a) +b
Print c
End Sub
[填空题]设有命令按钮Command1的单击事件过程,代码如下:
Private Sub Command1_Click( )
Dim a(30)As Integer
For i=1 To 30
a(i)=i
Next
For Each arrItem 【13】 a
If arrItem Mod 7=0 Then Print arrItem:
If arrItem>90 Then Exit For
Next
End Sub
请填空。