单项选择题

单击命令按钮时，下列程序代码的运行结果为( )。　　Private Sub Command1_Click() 　　　　print MyFunc(20，18) 　　End Sub 　　Public Function MyFunc (m As Integer，n As Integer)As Integer 　　　　Do While m <>n 　　　　　　Do While m ＞ n：m=m - n：Loop 　　　　　　Do While m ＜ n：n=n - m：Loop 　　　　Loop 　　　　MyFunc=m 　　End FunCtion

A．0
B．2
C．4
D．6

<上一题目录下一题>

热门试题

单项选择题

编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode AS Integer，Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按 A 键，则程序输出的结果是（）。

A．Panel
B．Frame
C．Applet
D．Dialog

单项选择题

单击窗体时，下列程序的执行结果是( )。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． abcdef
B． afbecd
C． fedcba
D． defabc

相关试题