在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x=0Do Until x=-1 a

第1题

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() x=0 Do Until x=-1

在窗体上画一个命令按钮，然后编写如下事件过程： 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 a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 ______。

A．2

B．3

C．14

D．15

点击查看答案

第2题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1 Click()Do Until b＜O a=In

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1 Click()

Do Until b＜O

a=InputBox("输入a的值")

a=Val(A)

b=InputBox("输入b的值")

b=Val(B)

a=a+b

Loop

Print a

End Sub

程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【】

点击查看答案

第3题

在窗体上画一个命令按钮，然后编写如下时间过程()。程序运行后，单击命令按钮，先后在两个输入对

在窗体上画一个命令按钮，然后编写如下时间过程（）。

程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是

A. 579

B. 123

C. 456

D. 123456

点击查看答案

第4题

在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后

编写如下两个事件过程：程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入一个具有大小写的字符串，则在标签中显示的内容全部为大写。请填空。

点击查看答案

第5题

假定有以下函数过程： Function Fun（S As String) As String Dim s1 As String For i=1 To Len（S)

假定有以下函数过程： Function Fun(S As String) As String Dim s1 As String For i=1 To Len(S) s1=UCase(Mid(S，i，1))+s1 Next i Fun=S1 End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim Str1 As String，Str2 As String Str1=Input Box(“请输入一个字符串”) Str2=Fun(Str1) Print Str2 End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确定”按钮后在窗体上的输出结果为

A．abederg

B．ABCDEFG

C．gfedcba

D．GFEDCBA

点击查看答案

第6题

在窗体上绘制一个文本框，然后编写如下事件过程：Private Sub Form_Click()x=InputBox（"请输入一个

在窗体上绘制一个文本框，然后编写如下事件过程： Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为()。

A．123

B．456

C．579

D．123456

点击查看答案

第7题

窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()x = InputBox（

窗体上有一个命令按钮Command1，编写如下事件过程：

Private Sub Command1_Click()

x = InputBox("x=")

y = InputBox("y=")

Print x + y

End Sub

运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是()。

A、 444

B、 123321

C、 123+321

D、出错信息

点击查看答案

第8题

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click（） Next i Print Dec End Sub 程序功能为:单击命令按钮,将产生一个输入对话框,此时如果在对话框中输入一个二进制数,并单击“确定”按钮,则把该二进制数转换为等值的十进制数。这个程序不完整,应在横线处填入的内容是

A.Left

B.Right

C.Val

D.Mid

点击查看答案

第9题

窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮。命令按钮的单击事件过程如下： P

rivate Sub Command1 Click（） XzInputBox("输入X："，，0) y=InputBox("输入y："，，0) Label1．Caption=x+y End Sub 运行程序，单击命令按钮，在输入对话框中分别输入2、3，运行的结果是（）。

A.程序运行有错误，数据类型不匹配

B.程序运行有错误，InputBox函数的格式不对

C.在Label1中显示5

D.在Label1中显示23

点击查看答案

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)x=0Do Until x=-1 a