当执行以下过程时，在窗体上将显示( )。

Private Sub Command1_Click( )

Print "VB";

Print "Hello! ";

Print "VB"

E．nd Sub

A． VBHello!VB

B． VB

H．ello!VB

C． VB

D． VB

H．ello! VB Hello!

VB

[单选题]当执行以下过程时，在窗体上将显示（）A . VBHello！VBB . VB回车Hello！VB回车C . VB回车HelloVB回车D . VB回车Hello！回车VB回车

[单选题]执行以下Command1的Click事件过程在窗体上显示（）Private Sub Command1_Click()Dim aa = Array(“a”,”b”,”c”,”d”,”e”,”f,”,”g”)Print a(1); a(3); a(5)End SubA . a；b；cB . b；d；fC . a；c；eD . 出错

[单选题]单击窗体上Command1命令按钮时，执行如下事件过程： Private Sub Command1-Click() a$="software and hardware" b$=Right(a$，8) c$=Mid(a$，1，8) Msgbox a $,,b$；c$,1 End sub 则在弹出的信息框的标题栏中显示的信息是( )。A．software and hardwareB．softwareC．hardwareD．1

[单选题]执行以下程序,在窗体上输出()。Private Sub Command1_Click()D．im a(20)As IntegerF．or j = 1 To 20 Step 2a(j)= jNext jPrint a(1)+ a(2)+ a(3)AAAAAAAAaE．nd SubA． 4B． 5C． 6D． 7

[单选题]下面程序运行后，窗体中显示______。Private Sub Command1_ Click() a＄ = "*": b＄ = "＄ for k = 1 To 3 x＄ = String＄(Len(a＄) +k, b＄) Print x＄; Next k PrintEnd SubA．*** ** ***B．*＄*＄*＄C．1*＄2*＄3*＄D．＄＄＄＄＄＄＄＄＄

[单选题]执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1 Click() Dim a a= Array("a"， "b"， "C"， "d"， "e"， "f"， "g") Print a(1)； a(3)； a(5) End SubA．ab；B．bdfC．aceD．出错

[单选题]执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1_Click( ) Dim a a=Array("a" ,"b"，"c"，"d"，"e","f","g") Print a(1)；a(3)；a(5) End SubA．abcB．bdfC．aceD．出错

[单选题]执行以下Command1的Click事件过程在窗体上显示 Option Base 1 Private Sub Command1_Click() Dim a a=Array("a"，"b"，"c"，"d"，"e"，"f"，"g") Print a(1)； a(3)； a(5) End SubA．abcB．bdfC．aceD．出错

[单选题]执行以下Command1的Click事件过程，在窗体上显示 Option Base 0 Private Sub Command1_Click() Dim a a = Array("a", "b", "c", "d", "e", "f", "g") Print a(1); a(3); a(5) End SubA．abcB．bdfC．aceD．出错

[单选题]在窗体上有一个命令按钮Command1，编写事件代码如下： Private Sub Command1_Click() Dim y As Integer y=0 Do y=InputBox("y=") If(y Mod 10)+Int(y/10)=10 Then Debug.Print y； Loop Until y=0 End Sub 打开窗体运行后，单击命令按钮，依次输入10、37、50、55、64、20、28、19、-19、0，立即窗口上输出的结果是( )。A．37 55 64 28 1