在窗体中有一个文本框Test1，编写事件代码如下： Private Sub Form_Click() X=Val(InputBox("输入X的值")) Y=1 If X＜＞0 Then Y=2 Text1.Value=Y End Sub 打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是( )。A．1B．2C．3D．4
在窗体中有一个文本框Test1，编写事件代码如下： Private Sub Form_Click() X=Val(InputBox("输入X的值")) Y=1 If X＜＞0 Then Y=2 Text1.Value=Y End Sub 打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是( )。
A．1
B．2
C．3
D．4
相关考题：
请输入B的值在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()x=0DoUntilx=－1a=InputBox("请输入A的值")a=Val(a)b=InputBox("请输入B的值")b=Val(b)x=InputBox("请输入x的值")x=Val(x)() A.2B.3C.15D.14
（ 32 ）在窗体中有一个文本框 text1, 编写事件代码如下：Private sub form_click()X=val(inputbox( “ 输入 x 的值 ” ))Y=1If x then y=2Text1.value=yEnd sub打开窗体运行后。在输入框中输入整数 12 ，文本框 text1 中输出的结果是A ） 1B ） 2C ） 3D ） 4
在窗体中有一个文本框Textl，编写事件代码如下：Private Sub Form. Cl ick() ’X=val(Inputbox(“输入X的值”))Y=1If X0 Then Y：2Textl．Value=YEnd Sub打开窗体运行后，在输入框中输入整数12，文本框Textl中输出的结果是A．1B．2C．3D．4
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_ Click() x=0 Do Until x=-1 a=InputBox(“请输入A的值”) a=Val(a)b=InputBox(“请输入B的值”) b=Val(b)x=InputBox(“请输入x的值”) x=Val(x) a=a+ b+ x Loop Print aEnd Sub程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 ______。A．2B．3C．14D．15
在窗体上画一个命令按钮，然后编写如下事件过程： Prevate Sub Command1_ Click() x=0 Do Until x=-1 a= InputBox(“请输入A的值”) a= Val (A)b=InputBox(“请输入B的值”) b=Val (B)x=InputBox(“请输入x的值”) x=Val (x) a=a+ b+ x Loop Print a End Sub程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为______ 。A．2B．3C．14D．15
在窗体中有一个文本框Textl，编写事件代码如下： Private Sub Form. Click（ ） X=val（Inputbox（‘‘输入x的值‘‘））Y=1IfX◇0 Then Y=2Textl．Value=YEnd Sub打开窗体运行后，在输入框中输入整数12，文本框Textl中输出的结果是（ ）。【考点4 VBA流程控制语句】A.1B.2C.3D.4
在窗体中有一个文本框Testl，编写事件代码如下： Private Sub Form. Click（ ） X=val(Inputbox(”输入x的值”))Y=1 If X0 Then Y=2Text1．Value=YEnd Sub． 打开窗体运行后，在输入框中输入整数12，文本框Textl中输出的结果是（ ）。A.1B.2C.3D.4
在窗体上画一个命令按钮，然后编写如下事件过程: x = 0 Do Until x = -1 a = val（InputBox（"A的值")):b = val（InputBox（"B的值")) x = val（InputBox（"x的值")) a = a + b + x Loop Print a 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为_____。A．14B．3C．2D．12
在窗体中有一个文本框Text1，事件代码如下： Private Sub Form_Click（) X = val（Inputbox（"输入x的值")) Y = 1 If X＜＞0 Then Y = 2 Text1.Value = Y End Sub 打开窗体运行后，在输入框中输入整数12，文本框Text1中输出的结果是______。A．1B．2C．3D．4