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

[主观题]

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

下两个事件过程： Private Sub Command1_Click() strText=InputBox("请输入") Text1. Text=strText End Sub Private Sub Text1_Change() Label1. Caption=Right(Trim(Text1. Text), 3) End Sub 程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是______。

A．空

B．abcdef

C．abc

D．def

查看答案

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

您可能会需要：

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

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

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

第1题

在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1，然后编写如下两个事件过程：Pr

在窗体上画一个文本框Text1、一个标签Label1和一个命令按钮Command1，然后编写如下两个事件过程： Private Sub Command1_Click() a=InputBox("请输入一个字符串") Text1．Text=a End Sub Private Sub Textl_Change() Label1．Caption=UCase(Mid(Text1．Text，8)) End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“Visual Basic”，则在标签中显示的内容是

A．visual basic

B．VISUAL BASIC

C．basic

D．BASIC

点击查看答案

第2题

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

下两个事件过程： Private Sub Command1_Click() strText=InputBox("请输入") Text1.Text=strText End Sub Private Sub Text1_Change() Label1.Caption=Right(Trim(Text1.Text)，4) End Sub 程序运行后，如果在对话框中输入abcdefgh，则在标签中显示的内容是 ______。

A．空

B．abcdef

C．abcd

D．efgh

点击查看答案

第3题

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

编写如下两个事件过程：

Private Sub Command1_Click（）

strText = InputBox（"请输入"）

Text1.Text = strText

End Sub

Private Sub Text1_Change（）

Label1.Caption = Right（Trim（Text1.Text）, 3）

End Sub

程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是（）。

A．空

B．abcdef

C．abc

D．def

点击查看答案

第4题

在窗体上画一个文本框（其名称为Text1)和一个标签（其名称为Labell)，程序运行后，如果在文本框中输

在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labell)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是______。

A． Private Sub Text1 Click() Labell.Caption=Text1.Text End Sub

B．Private Sub Text1_Change() Labell.Caption=Text1.Text End Sub

C．Private Sub Labell_Change() Labell.Caption=Text1.Text End Sub

D．Private Sub Labell_Click() Labell.Caption=Text1.Text End Sub

点击查看答案

第5题

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：Priva

在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl_C1ick() Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 If i＞10 Then Exit For Next Textl. Text=Str(n) End sub 程序运行后，单击命令按钮，在文本框中显示的值是 ()

A．2

B．3

C．4

D．5

点击查看答案

第6题

在窗体上画两个文本框（Name属性分别为Textl和Text2)和一个命令按钮（Name属性为Commandl)，然后编

在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下事件过程：在窗体上画两个文本框（Name属性分别为Textl和Text2)和一个命令按钮（Name属性为Com

A. 1和0

B. 2和72

C. 3和50

D. 4和168

点击查看答案

第7题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Priv

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:

Private Sub Command1_Click()

Dim arr(10,10)As Integer,i,j As Integer

For i=1 To 3

For j=2 To 4

arr(i,j)=i+j

Text1.Text=arr(2,3)+arr(3,4)

End Sub

程序运行后,单击命令按钮,在文本框中显示的值是

A．12

B．13

C．14

D．15

点击查看答案

第8题

在窗体（Name属性为form1)上画两个文本框（Name属性分别为Text1和Text2)和一个命令按钮（Name属性

在窗体(Name属性为form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮 (Name属性为Command1)，然后编写如下两个事件过程，该过程的运行结果为______。Private Sub Command1_Click() a = Text1, Taxt + Text2, Text Print aEnd SubPrivate Sub form_ Load() Text1.Text = "123" Text2.Text = "321"End Sub

A．444

B．321123

C．123321

D．132231

点击查看答案

第9题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Priva

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim arr(10，10)As Integer，i，j As Integer For i=1 To 3 For j=2 To 4 arr(i，j)=i+j Next Next Text1.Text=an(2，3)+arr(3，4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是

A．12

B．13

C．14

D．15

点击查看答案

第10题

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

在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写下列代码： Dim SaveAll As String Private Sub Form. Load（） Show Text1．Text="" Text1．SetFocus End Sub Private Sub Command1 Click（） Text1．Text=LCase(SaveAll)+SaveAll End Sub Private Sub Form. KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后，直接用键盘输入VB，再单击命令按钮，则文本框中显示的内容为（）。

A.vbVB

B.不显示任何信息

C.VB

D.出错

点击查看答案