更多"单击一次命令按钮后,下列程序的执行结果是( )。
Priva"的相关试题:
[单项选择]单击一次命令按钮后,下列程序的执行结果是 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
[单项选择]单击一次命令按钮之后,下列程序代码的执行结果为 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 Commandl_Click( ) s=P(1)+P(2)+P(3)+P(4) Print s End Sub Public FunctionP(N As Integer) Static Sum Fori=1To N Sum=Sum+i Nexti P=Sum End Function
A. 15
B. 25
C. 35
D. 45
[单项选择]单击一次命令按钮之后,窗体中的输出结果为______ 。 Private Sub Command1_ Click( ) Dim a As Single Dim b As Single a = 10 b = 20 Call Num(a, b) Print a, b End Sub Sub Num(a, b) t = a a = b / t b = t End Sub
A. 20 10
B. 10 20
C. 2 10
D. 10 10
[单项选择]设有命令按钮 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( ) x=InputBox("输入:","输入整数")MsgBox "输入的数据是:",,"输入数据:"+x End Sub 程序运行后,单击命名按扭,所果从键盘上输入整数10,则以下叙述中错误的是______。
A. x的值是数值10
B. 输入对话框的标题是“输入整数”
C. 信息框的标题是“输入数据:10”
D. 信息框中显示的“输入的数据是:”
[单项选择]单击命令按钮,下列事件过程的执行结果为 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