以下程序运行时，单击窗体后，在窗体上输出的结果是 ______。 Private SubForm_Click() Dim a As Integer，b As Integer a=10 ：b=20 Call ff(a，B)Print a，b End Sub Private Sub ff(x As Integer，y As Integer) x=x+y y=x+y End Sub

A．30 50

B．30 30

C．20 20

D．10 20

[单选题]下面程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form_Click() Dim I As Integer Dim sum As Long sum=0 For I=10 To 16 If I Mod 3=0 OrI Mod 5=0 Then sum=sum+I End If Next I Print sum End SubA．10B．12C．37D．22

[单选题]下面程序运行时，单击窗体后，窗体上显示的结果是( )。 Private Sub Form_Click Dim I As Integer Dim sum As Long Dim t1 As Long t1=1:sum=0 For 1=1 To 3 t1=t1*I sum=sum+t1 Next I Print sum End SubA．3B．9C．5D．6

[单选题]'下面的程序运行时,单击窗体后,窗体上显示的结果是( )。Private Sub Form_Click(B )D．im a(1 To 5)As Integera(1)= 2: a(2)= 3: a(3)= 1: a(4)= 5: a(5)= 4n = 5F．or i = 1 To n - 1Min = iF．or j = i + 1 To nIf a(j)< a(Min)Then Min = jNext jt = a(i): a(i)= a(Min): a(Min)= tNext iF．or

[单选题]'下面的程序运行时,单击窗体后,窗体上显示的结果是(B )。Private Sub Form_Click(B )D．im a(1 To 5)As Integera(1)= 2: a(2)= 3: a(3)= 1: a(4)= 5: a(5)= 4n = 5F．or i = 1 To n - 1Min = iF．or j = i + 1 To nIf a(j)< a(Min)Then Min = jNext jt = a(i): a(i)= a(Min): a(Min)= tNext iF．or

[单选题]下面的程序运行时，单击窗体后，窗体上显示的结果是（ ）。A．9 8 7 6 3 2B．2 3 6 7 8 9C．9 8 7 6 3D．2 3 6 7 8

[单选题]执行下面的程序，单击窗体后在窗体上显示的结果是 ______。Private Sub form_ Click() Dim Str1 As String, Str2 As String Dim Str3 As String, I As Integer Str1 = "e" for I = t To 2 Str2 = Ucase (Str1) Str1 = Str2 & Str1 Str3 = Str3 & Str1 str1 = Chr (Asc(Str1) + I) Next

[单选题]下列程序运行时，两次单击窗体后，显示的结果是( )。 Private Sub Form_Click() Dim b As Integer Static c As Integer b=b+2 c=c+2 Print "b="；b;"c=";c End SubA．b=2 c=2 b=2 c=2B．b=2 c=2 b=4 c=4C．b=2 c=2 b=2 c=4D．b=2 c=2 b=4 c=2

[单选题]当程序运行时，在窗体上单击鼠标，以下______ 事件是窗体不会接收到的。A． MouseDownB．MouseUpC．LoadD．Click

[单选题]当程序运行时，在窗体上单击鼠标，以下哪个事件是窗体不会接收到（）A . MouseDownB . MouseUpC . LoadD . Click

[单选题]当程序运行时,在窗体上单击鼠标,以下那个事件是窗体不能响应的事件A．MouseDownB．MouseUPC．LoadD．Click