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

[主观题]

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

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

A．vbVB

B．不显示任何信息

C．VB

D．出错

查看答案

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

您可能会需要：

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

安装赏学吧APP，拍照搜题省时又省心！

更多“在窗体上画一个命令按钮和一个文本框（名称分别为Command…”相关的问题

第1题

在窗体上画一个命令按钮和一个文本框，其名称分别为Commandl和Textl，然后编写如下程序：程序运行后

A.A.12

B.B.20

C.C.24

D.D.40

点击查看答案

第2题

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

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

后编写如下两个事件过程：

Private Sub Command1_Click()

S$=InputBox("请输入一个字符串")

Text1.Text=S$

End Sub

Private Sub Text1_Change()

Label1.Caption=UCase(Mid(Text1.Text, 7))

End Sub

程序运行后，单击命令按钮，将显示一个输入对话框，如果在该对话框中输入字符串“VisualBasic”，

则在标签中显示的内容是【6】。

点击查看答案

第3题

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

在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，然后编写如下事件过程： Private Sub Command1 Click() Dim arr1(10), arr2(10) For i = 1 To 10 arr1(i) = 3 * i arr2(i) = arr1(i) * 3 Next i Text1.Text = Str (arr2(i / 2 - 0.1)) End Sub程序运行后，单击命令按钮，在文本框中显示的是______。

A．36

B．45

C．54

D．63

点击查看答案

第4题

在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序: Private Sub

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

Private Sub Command1_Click()

a=InputBox("请输入日期 (1~31)")

t="旅游景点:"& IIf(a＞0 And a＜=10, "长城","") &

IIf(a＞10 And a＜=20, "故宫","") & IIf(a＞20 And a＜=31, "颐和园","")

Text1.Text=t

End Sub

程序运行后,如果从键盘上输入16,则在文本框中显示的内容是

A．旅游景点:长城故宫

B．旅游景点:长城颐和园

C．旅游景点:颐和园

D．旅游景点:故宫

点击查看答案

第5题

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：Private Sub

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序：

Private Sub Command1_Click()

a=InputBox("请输入日期(1～31)")

t="旅游景点：" &IIf(a＞0 And a＜=10，"长城"，"") & _

IIf(a＞10 And a＜=20，"故宫"，"") & IIf(a＞20 And a＜=31，"颐和园"，"")

Text1.Text=t

End Sub

程序运行后，如果从键盘上输入16，则在文本框中显示的内容是

A．旅游景点：长城故宫

B．旅游景点：长城颐和园

C．旅游景点：颐和园

D．旅游景点：故宫

点击查看答案

第6题

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

在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)，然后编写下列事件过程：

Private Sub Command1 Click（）

x=0

DO While x＜50

x=(x+2)*(x+3)

n=n+1

Loop

Text1．Text=Str(n)

Text2．Text=Str(x)

End Sub

程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）。

A.1和0

B.2和72

C.3和50

D.4和168

点击查看答案

第7题

在启动窗体Form1上画一个名为Command1的命令按钮和两个文本框（其名称分别为Text1和Text2)，新建一

在启动窗体Form1上画一个名为Command1的命令按钮和两个文本框(其名称分别为Text1和Text2)，新建一个窗体Form2。然后编写如下程序： Private Sub Command1_ Click() msg$ = "Retry" Title$ = "Error!" If TextText = "a" And TextText = "1" Then Unload Me Form. Show Else MsgBox msg$, vbOKOnly + vbCritical, Title$ End If End Sub运行该程序，要实现单击Command1命令按钮后卸载当前窗体，再弹出名为Form. 2的窗体，则在两个文本框中应分别输入______。

A．a 1

B．a a

C．1 a

D．1 1

点击查看答案

第8题

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

t1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Label1.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是： ______。

A．27

B．28

C．29

D．30

点击查看答案

第9题

在窗体上画两个文本框（其名称分别为Textl和Text2)和一个命令按钮（其名称为 Command1)，然后编写如

在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() Text1.Text="Microsoft Visual Basic" End Sub Private Sub Text1_Change() TextText=UCase(Text1.Text) End Sub 程序运行后，单击命令按钮，则在Text2文本框中显示的内容是

A．Microsoft Visual Basic

B．microsoft visual basic

C．MICROSOFT VISUAL BASIC

D．空字符串

点击查看答案

第10题

在窗体上画两个文本框（其名称分别为Text1和Text2)和一个命令按钮（其名称为 Commandl)，然后编写如

在窗体上画两个文本框(其名称分别为Text1和Text2)和一个命令按钮(其名称为 Commandl)，然后编写如下两个事件过程： Private Sub Command1_Click() Text1.Text = "Computer Rank Examination" End Sub Private Sub Text1_Change() Text2.Text = UCase(Text1.Text) End Sub程序运行后，单击命令按钮，则在Text2文本框中显示的内容是______。

A．Computer Rank Examination

B．computer rank examination

C．COMPUTER RANK EXAMINATION

D．空字符串

点击查看答案