题目内容
（请给出正确答案）
单击命令按钮时，下列程序的执行结果为 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 A”相关的问题
单击命令按钮时，下列程序的执行结果为()。 Private Sub Commandl_Click() Dimx As Integer，y As Integer x=50:y=78 CallPPP(x，y) Printx；y End Sub Pubfic Sub PPP(ByValnAsInteger，ByValm As Integer) n=n\10 m=m\10 End Sub
A．08
B．50 78
C．450
D．78 50
单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click() Dim x As Integer，y As Integer x=50：y=78 Call PPP(x，y) Print x；y End Sub Public Sub PPP(ByVal n As Integer，ByValm As Integer) n=n\10 m=m\10 End Sub
A．08
B．50 78
C．450
D．78 50
单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click() Dim x As Integer，y As Integer x=50：y=78 Call PPP(x，y) Print x；y End Sub Public Sub PPP(ByVM n As Integer，ByVal m As Integer) n=n\l0 m=m\l0 End Sub
A．08
B．50 78
C．450
D．78 50
单击命令按钮时，下列程序的执行结果为 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．12 32
B．2 32
C．2 3
D．12 3
单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click() Dim x As Integer，y As Integer x=12：y=32 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．2 32
C．2 3
D．12 3
单击命令按钮时，下列程序段的执行结果为()。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m\10 End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer x=12;y=34 Call Procl(x,y) Print x;y End Sub
A．12 34
B．2 34
C．2 3
D．12 3
单击一次命令按钮之后，下列程序代码的执行结果为 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 Function P(N As Integer) Static sum For I=I To N Sum = sum +1 Next I P =sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S： End Sub
A．20
B．30
C．115
D．135
单击命令按钮时，下列程序的执行结果为
Private Sub Command1_Click（）
Dim a As Integer, b As Integer, c As Integer
a=2: b=3: c=4
Print P2（c, b, A．
End Sub
Private Function P1（x As Integer, y As Integer, z As Integer）
P1=2 * x + y + 3 * z
End Function
Private Function P2（x As Integer, y As Integer, z As Integer）
P2=P1（z, x, y） + x
End Function （）。
A．21
B．19
C．17
D．34
单击命令按钮时，下列程序段的执行结果为()。 Private Sub Command1_Click() Dim FirstStr As String FirstStr="abcdef" Print PickMid(FirstStr) End Sub Private Function PickMid(xStr As String)As String Dim tempStr As String,strLen As Integer TempStr=" " strLen=Len(xStr) i=1 Do While i＜=strLen/2 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1) i=i+1 Loop PickMid=tempStr End Funcfion
A．abcdef
B．fed
C．fedcba
D．defabc
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
