题目内容（请给出正确答案）

[主观题]

在窗体上画一个命令按钮，然后编写如下事件过程： 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，则输出结果是【】

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“在窗体上画一个命令按钮，然后编写如下事件过程： Privat…”相关的问题

第1题

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

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

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

A. 579

B. 123

C. 456

D. 123456

点击查看答案

第2题

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

在窗体上画一个命令按钮，然后编写如下事件过程： 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

点击查看答案

第3题

在窗体上画一个命令按钮，然后编写如下事件过程：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

点击查看答案

第4题

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

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

点击查看答案

第5题

在窗体上画一个命令按钮（名称为Command1)，然后编写如下事件过程：Private Sub Command_Click()Sta

在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command_Click() Static b As Integer b=b+1 End Sub运行程序，第3次单击命令按钮后，变量b的值为______。

A．0

B．1

C．2

D．3

点击查看答案

第6题

假定有以下函数过程： 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

点击查看答案

第7题

在窗体上绘制一个文本框，然后编写如下事件过程：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

点击查看答案

第8题

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() For i=1 To 4

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next Next Next Print x End Sub 程序运行后，单击命令按钮，输出的结果是

A．7

B．15

C．157

D．538

点击查看答案

第9题

在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设

置为空白，然后编写如下事件过程：

Private Sub Command1_Click（）

a = InputBox（"Enter an integer"）

b = InputBox（"Enter an integer"）

Text1.Text = b + a