下面过程运行之后，则变量J的值为( )。 Private Sub Fun() Dim J As Integer J=5 Do J=J+2

A．3

B．7

C．9

D．11

[单选题]下面过程运行之后，则变量J的值为( )。 Private Sub Fun() Dim f AS Integer J-5 Do J=J*2A．3B．10C．9D．7

[单选题]下面过程运行之后，则变量J的值为( )。 Private Sub Fun() Dim J As Integer J＝5 Do J＝J*2A．3B．10C．9D．7

[单选题]运行下面程序代码后，变量J的值为______。 Private Sub Fun () Dim J as Integer J=10 DO J=J+3 Loop While J＜19 End SubA．10B．13C．19D．21

[单选题]运行下面程序代码后，变量J的值为______。 Private Sub Fun() Dim J as Integer J=10 Do J=J+3 Loop While J＜19 End SubA．10B．13C．19D．21

[单选题]运行下面程序代码后，变量J的值为______。Private Sub Full () Dim j as Integer J=10 DO J=J+3 Loop While J<19 End SubA．10B．13C．19D．21

[单选题]下面程序运行结果是( )。 Private Sub Form_Click() Dim x As Single,y As Single x=InputBox("请输入数据25"):y=InputBox("请输入数据10") Print x+y;InputBox("请输入数据25")+InputBox("请输入数据10") End SubA．_35_2510B．25102510C．_35_35_D．2510_35_

[单选题]运行下列程序：Private Sub Form_Click( )D．im a As Integera = 1F．or i = 1 To 5C．all fun1(a)Next iPrint aE．nd SubPrivate Sub fun1(x)y = 2D．ox = x + yLoop Until x > 10E．nd Sub单击窗体后，则在窗体上显示的结果是( )。A．5B．1 2 3 4 5C．19D．7

[单选题]下面程序： Private Sub Form. _Click () Dim x, y, z As Integer x=5 y=7 z=0 Call P1(x, y, z) Print Str (z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer , c As Integer) c= a+b End Sub 运行后的输出结果为______。A．0B．12C．Str(z)D．显示错误信息

[单选题]运行下列程序:Private Sub form_Click( )Dim xx = 0Do While x < 10x = x £« 3LoopMsgBox x运行下列程序：Private Sub form_Click( )D．im xx = 0D．o While x < 10x = x + 3LoopMsgBox xE．nd Sub单击窗体后，则在窗体上显示的结果是( )。A．0B．3C．10D．12

[单选题]运行下列程序：Private Sub Form_Click()D．im sum As IntegerD．im i As Integersum = 0F．or i =12.4 To3.1 Step -3.8sum = sum + iNext iD．ebug.Print sumE．nd Sub单击窗体后，则在立即窗口上输出结果是()。A．15B．- 0.7C．24D．0