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

[主观题]

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

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

查看答案

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

您可能会需要：

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

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

更多“在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为T…”相关的问题

第1题

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

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

Private Sub Command1_Click（）

a = InputBox（"Enter an integer"）

b = InputBox（"Enter an integer"）

Text1.Text = b + a

End Sub

程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是（）。

A．108

B．18

C．810

D．出错

点击查看答案

第2题

在窗体上画一个命令按钮和一个文本框，然后编写命令按钮的Click事件过程。程序运行后，在文

本框中输入一串英文字母（不区分大小写），单击命令按钮，程序可找出未在文本框中输入的其他所有英文字母，并以大写方式降序显示到Text1中。例如，若在Text1中输入的是abDfdb，则单击Command1按钮后Text1中显示的字符串是ZYXWVUTSRQPONMLKJIHGEC。请填空。

Private Sub Command1_Click（）

Dim str As String, s As String, c As String

str = UCase（Text1）

s = ""

c = "Z"

While c ＞= "A"

If InStr（str, c） = 0 Then

s = 【7】

End If

c = Chr$（Asc（c）【8】）

Wend

If s ＜＞ "" Then

Text1 = s

End If

End Sub

点击查看答案

第3题

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

A.Left

B.Right

C.Val

D.Mid

点击查看答案

第4题

（18 ）在窗体上画一个命令按钮和一个标签，其名称分别为 Command1 和 Label1 ，然后编写如下事

件过程：

Private Sub Command1_Click()

Counter = 0

For i = 1 To 4

For j = 6 To 1 Step -2

Counter = Counter + 1

Next j

Next i

Label1.Caption = Str(Counter)

End Sub

程序运行后，单击命令按钮，标签中显示的内容是

A ） 11

B ） 12

C ） 16

D ） 20

点击查看答案

第5题

窗体上有一个名称为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

点击查看答案

第6题

在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()MsgBox Str（123+321

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() MsgBox Str(123+321) End Sub 程序运行后，单击命令按钮，则在信息框中显示的提示信息为

A．123+321

B．字符串"444"

C．数值444

D．空白

点击查看答案

第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 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

点击查看答案

第9题

在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件

过程： Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2, 4, 6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select TextText=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是______。

A．10

B．20

C．30

D．40

点击查看答案

湘ICP备16018319号-4 营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：2861363944@qq.com