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

[主观题]

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

在窗体上画两个文本框(名称分别为Text1和Text2)和—个命令按钮(名称为Cotranand1)，然后编写如下事件过程：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

提问人：网友hbcblsw 发布时间：2022-01-06

参考答案

查看官方参考答案

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

您可能会需要：

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

安装简答题APP，拍照搜题省时又省心！

更多“在窗体上画两个文本框（名称分别为Text1和Text2)和—…”相关的问题

第1题

在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”，如图所示。现有如

在窗体上画两个名称分别为Text1、Text2的文本框。Text 1的Text的属性为“DataBase”，如图所示。

现有如下事件过程

Private Sub Text1_Change（）

Text 2．Text=Mid(Text1，1，5)

End Sub

运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是（）。

A.DataA

B.DataB

C.aData

D.aBase

点击查看答案

第2题

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form. Load（)Sho

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form. Load() Show Text1. Text="" TextText="" Text1. SetFocus End Sub Private Sub Text1_Change() TextText=Mid(Text1. Text, 8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是______。

A．Beijing

B．China

C．Beijing

D．BeijingC

点击查看答案

第3题

在窗体上画两个单选按钮，名称分别为Opfion1，Option2，标题分别为“宋体”和“黑体”；一个复选框，名称

为Check1，标题为“粗体”：一个文本框，名称为Text1，Text属性为“改变文字字体”。要求程序运行时，“宋体”单选按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是()。

A．Option1.Value=True Check1.Value=False

B．Oprion1.Value=True Check1.Value=Tme

C．Option2.Value=False Check1.Value=Tme

D．Optionl.Value=True Check1.Value=1

点击查看答案

第4题

在窗体上画一个命令按钮Command1和两个文本框，名称分别为Text 1和 Text 2 Text 2。编写如下两个事

件过程： Dim str As String, strl As String Private Sub form_load() TextText = " " TextText = " " TextEnabled = False TextEnabled = False End Sub Private Sub Form. KeyPress(KeyAscii As Integer) str= str&Chr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) str1 = strl&Chr(KeyCode) End Sub Private Sub Command1_Click() TextText =str TextText = str1 str= " " str1= " " End Sub 当在设计阶段把窗体KeyPreview属性设置为True时，程序运行过程中，在键盘上输入小写字母abc，然后单击命令按钮，则文本框Text1中显示的内容为 ______ 。

A．abc

B．不显示任何信息

C．ABC

D．出错

点击查看答案

第5题

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

下两个事件过程： Private Sub Command1_Click() str Text=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

点击查看答案

第6题

在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为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

点击查看答案

第7题

在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text然后编写如下程序： Private Sub Command1_Click（) a=InputBox（“请输入日期（1~31）”) t=”旅游景点：” _ & IIf （a >0 And a<= 10,”长城”,””) _ & iif （a >10 And a<= 20,”故宫”,””) _ &

A.旅游景点：长城故宫

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

C.旅游景点：颐和园

D.旅游景点：故宫

点击查看答案

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

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

在窗体(Name 属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Commnd1_Click() a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_ Load () Text1 Text=“” Text2 Text=“” End sub程序运行后，在第一个文本框(Text1)和第二个文本框(text2)中分别输入123和321，然后单击命令按钮，则输出结果为______ 。

A．444

B．321123

C．123321

D．132231

点击查看答案

第10题

在窗体上画一个命令按钮和一个文本框，名称分别为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=tEnd Sub 程序运行后，如果从键盘上输入16，则在文本框中显示的内容是______。

A．旅游景点：长城故宫

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

C．旅游景点：颐和园

D．旅游景点；故宫

点击查看答案

第11题

在窗体上画一个命令按钮和一个文本框，其名称分别为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．出错

点击查看答案