【单选题】单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click() Print Fun(23, 18) End Sub Public Function Fun(m As Integer, n As Integer) As Integer Do While m $amp Do While m > n: m=m - n: Loop Do While m < n: n=n -...
【单选题】单击命令按钮时,下列程序的运行结果为 Private Sub Command1_Click( ) Print MyFund(20,18) End Sub Public Function MyFund(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 Lo...
【单选题】单击命令按钮时,下列程序的执行结果是 Private Sub Commandl_Click( ) BT 4 End Sub PriVate Sub BT(x As Integer) X=X * 2 + 1 If x <6 Then Call BT(x) End If X=x * 2 Print x; End Sub
【单选题】运行下列程序: Option Base 1 Private Sub Form_Click() y = 43 x = Array(21, 4, 50, 18, 23, 44, 87, 32, 67, 70) For i = 1 To 10 If x(i) < y Then z=x(i) + 1 y=x(i) Else z=z + y End If Next i Print z End S...