单项选择题

在窗体中有一个名为Command1的命令按钮，并编写有以下代码。程序执行时，单击命令按钮，输出的结果为( )。
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．2 3
B．2 34
C．12 3
D．12 34

<上一题目录下一题>

热门试题

单项选择题

下列程序代码段中，在单击命令按钮调用SelMid函数时，其运行结果为( )。 Private Function SelMid(aStr As String)As String Dim temp As String Dim sLen As Integer temp= sLen=Len(aStr) i=1 Do While i＜=sLen 2 temp=temp+Mid(aStr,i,1)+Mid(aStr,sLen-i+1,1) i=i+1 Loop SelMid=temp End Function Private Sub Command1_Click() Dim Str As String Str= abcdef :Print SelMid(Str) End Sub

A．abcdef
B．afbecd
C．fedcba
D．defabe

单项选择题

下列程序执行后，变量x的值为( )。 Dim a,b,c,d As Single Dim x As Single a=10:b=30:c=400 If b＞a Then d=a:a=b:b=d End If If b＞c Then x=b ElseIf a＞c Then x=c Else x=a End If

A．10
B．30
C．400
D．430

相关试题