单项选择题

在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Sub Command1_Click( ) Dim x As Integer Static y As Integer x=10 y=5 Call f1(x,y) Print x,y End Sub Private Sub f1(ByRef x1 As Integer,y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是( )。

A.10 5
B.12 5
C.10 7
D.12 7
<上一题 目录 下一题>
热门 试题

单项选择题
单击窗体时,下列程序的执行结果是( )。Private Sub Invert(By Val xstr As String,ystr As String)Dim tempstr AS StringDim I AS IntegerI=Len(xstr)Do While I>=1tempstr=tempstr + Mid(xstr,I,1)I=I - 1LoopyStr=tempStrEnd SubPrivate Sub Form_Click( )Dim s1 As String,s2 As StringS1= abcdef Invert S1,S2Print S2End Sub
A.blooean isAlive( )
B.Thread currentThread( )
C.String getName( )
D.smtic boolean interrupted( )
单项选择题
单击命令按钮时,下列程序代码的运行结果为( )。Private Sub Command1_Click()print MyFunc(20,18)End SubPublic Function MyFunc (m As Integer,n As Integer)As IntegerDo While m <>nDo While m > n:m=m - n:LoopDo While m < n:n=n - m:LoopLoopMyFunc=mEnd FunCtion
A.Dim gg[1,5]As String
B.Dim gg[1 To 5,1 To 5]As String
C.Dim gg(1 To 5)As String
D.Dim gg[1:5,1:5]As String
相关试题
  • 有如下函数过程:Function HFC(ByVal x...
  • 单击按钮时,以下程序运行后的输出结果是(...