若看到程序中有以下事件过程，则可以肯定的是，当程序运行时

Private Sub Click_MouseDown(Button As Integer，

Shift As Integer，X As Single，Y As Single)

Print”VB Program”

E．nd Sub

A．用鼠标左键单击名称为“Commandl”的命令按钮时，执行此过程

B．用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程

C．用鼠标右键单击名称为“MouseDown”的控件时，执行此过程

D．用鼠标左键或右键单击名称为“Click”的控件时，执行此过程

[单选题]若看到程序中有以下事件过程，则可以肯定的是，当程序运行时（ ）。 Private Sub Click MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) Print”Visual Basic Program” End SubA． 用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程B． 用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程C． 用鼠标右键单击名称为“MouseDown

[单选题]若看到程序中有以下事件过程，则可以肯定的是，当程序运行时（　　）。Private Sub Click_MouseDown（Button As Inte

[单选题]（ 16 ）若看到程序中有以下事件过程，则可以肯定的是，当程序运行时Private Sub Click_MouseDown(Button As Integer,_Shift As Integer,X As Single,Y As Single)Print “ VB Program ”E．nd SubA． ）用鼠标左键单击名称为 “ Command1 ” 的命令按钮时，执行此过程B． ）用鼠标左键单击名称为 “ MouseDown ” 的命令按钮时，执行此过程C． ）用鼠标左键单击名称为 “ Mo

[单选题]（ 30 ）下面程序运行时，若输入 395 ，则输出结果是Private Sub Comand1_Click （）D．im x%x=InputBox (" 请输入一个 3 位整数 ")Print x Mod 10,x/100, ( x Mod 100 ) /10E．nd SubA． ） 3 9 5B． ） 5 3 9C． ） 5 9 3D． ） 3 5 9

[单选题]下列程序运行时,消息框显示的内容是( )。Private Sub Command1_Click()MsgBox CStr(123 + 321)E．nd SubA． 444B． 123321C． 123+321D． 显示出错信息

[单选题]下列程序运行时输出的结果是Option Base 1Private Sub Form_Click()D．im x(10) As Integer,y(5) As IntegerF．or i=1 to 10x(i)=10-i+1NextF．or i= 1 to 5y(i)=x(2*i-1)+x(2*i)NextF．or i= 1 to 5Print y(i)NextE．nd SubA．3 7 11 45 19B．19 15 11 7 3C．1 3 5 7 9D．不确定的值

[单选题]下列程序运行时输出的结果是( )。 Private Sub Form_Click() Dima a=Array("天天向上"，"清华大学"，"天上人间"，"程序设计") forI=Lbound(a，1) to Ubound(a，1) ifleft(a(i)，1)="天"then print a(i)； nextI End SubA．天天向上B．天天向上天上人间C．出错信息D．天天向上清华大学天上人间程序设计

[单选题]以下程序运行时，输入3和4后输出的结果是______。 Private Sub Command1_Click() a=InputBox(“请输入a的值”) b=InputBox(“请输入b的值”) Print a+b End SubA．3+4B．7C．34D．12

[单选题]下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dimx(10)As Integer,y(5) As Integer ForI=1 to 10 x(i)=10-I+1 NextI ForI=1 to 5 y(i)cx(2*-1)+x(2*I) NextI ForI=1 to 5 Printy(i)； NextIA．3 7 11 45 19B．17 13 9 5 1C．1 3 5 7 9D．不确定的值

[单选题]下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dimx(10) ForI=1 to 10 x(i)=10-I+1 Next I ForI=10 to 1 step-2 Printx(i)； NextI End SubA．1 3579B．975 3 1C．1234567 89 10D．1098765432 1