更多"单击一次命令按钮之后,窗体中的输出结果为______ 。 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( ) For i = 1 To 4 x = fun(i) Print x; Next i End Sub Function (n) x = n * n FF = x End Sub
A. 1 4 9 16
B. 1 3 5 7
C. 3 6 9 12
D. 2 4 6 8
[单项选择]单击一次命令按钮后,下列程序的执行结果是 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 i P=Sum End Function
A. 15
B. 25
C. 35
D. 45
[单项选择]单击一次命令按钮后,下列程序的执行结果是( )。
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 i
P=Sum
End Function
A. 15
B. 25
C. 35
D. 45
[单项选择]设有命令按钮 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
[单项选择]单击命令按钮,下列事件过程的执行结果为 Private Sub Command1_Click( ) Dim x As Integer, y As Integer x=40:y=72 Call PtoP(x, y) Print x; y End Sub Public Sub PtoP(Byval n AS Integer, ByVal m Aa Integer) n = n / 10+2 m = m / 10+2 End Sub
A. 0 8
B. 40 72
C. 4 50
D. 78 50
[单项选择]单击命令按钮时,下列的执行结果为 Private Sub Command1_Click( ) Dim x As Integer,y As Integer x=86:y=29 Call Proc(x,y) Print x;y End Sub Public Sub Proc(n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub
A. 12 32
B. 6 29
C. 2 3
D. 12 3
[单项选择]单击命令按钮时,下列程序的执行结果为 Private Sub Command1 Click( ) Dim x As Integer,y As Integer x=12:y=32 Call PCS(x,y) Print x;y End Sub Public Sub PCS(ByVal n As Integer,ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub
A. 1232
B. 232
C. 23
D. 123
[单项选择]单击命令按钮时,下列的执行结果为( )。
Private Sub Command1_Click( )
Dim x As Integer,y As Integer
x=86:y=29
Call Proc(x,y)
Print x;y
End Sub
Public Sub Proc(n As Integer,ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A. 12 32
B. 6 29
C. 2 3
D. 12 3
[单项选择]单击命令按钮时,下列程序的执行结果为( )。
Private Sub Command1 Click( )
Dim x As Integer,y As Integer
x=12:y=32
Call PCS(x,y)
Print x;y
End Sub
Public Sub PCS(ByVal n As Integer,ByVal m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
A. 1232
B. 232
C. 23
D. 123