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

[主观题]

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程： Private Sub Form_Load

() Show Text1.Text="" Text2.Text="" Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后，如果在Text2文本框中输入“efghi”，则Text1文本框中的内容为【】。

查看答案

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

您可能会需要：

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

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

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

第1题

在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Comma

nd1_Click() Text1．Text="计算机" TextText=Text1．Text Text1．Text="等级考试" End Sub 程序运行后，单击命令按钮，两个文本框(Text1和Text2)中的内容分别为【】和【】。

点击查看答案

第2题

在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程： Private Sub Command1_Click（) a=Val（TextText)+TextText Print a End Sub Private Sub Form_Load（) TextText="" TextText

A.444

B.321123

C.123321

D.132231

点击查看答案

第3题

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

过程： Private Sub Command1 Click() Dim x As Integer， n As Integer x = 1 n = 0 Do While x ＜ 20 x = x * 3 n = n + 1 Loop Text1．Text = Str(x) TextText = Str(n) End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别是

A．15和1

B．27和3

C．195和3

D．600和4

点击查看答案

第4题

在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输

入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填()。

Private Sub Text1_ _________() TextText=Text1.Text End Sub

A．SetFocus

B．Change

C．GetFocus

D．Click

点击查看答案

第5题

在窗体有两个名为text1、text2的文本框和一个名为Command 1的命令按钮，事件过程：Private sub o

在窗体有两个名为text1、text2的文本框和一个名为Command 1的命令按钮，事件过程：

Private sub ommand 1 click()

Dim x as Integer，n as Integer

x=1

n=0

Do Whilex＜20

x=x*3

n=n+1

Loop

text1=str(x)

text2=str(n)

End Sub

程序运行后，单击命令按钮，在两个文本框text1和text2中显示的值分别是()。

A、15和1

B、27和3

C、195和3

D、600和4

点击查看答案

第6题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click（)x = InputBox（"请输入一个整数")Print x + TextTextEnd Sub程序运行时，在文本框中输入然后单击窗体，在输入对话框中输入单击“确定”按钮后，在窗体上显示的内容是：（）

A.123

B.456

C.579

D.123456

点击查看答案

第7题

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

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

A．12

B．13

C．14

D．15

点击查看答案

第8题

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()Dim x As Integerx = V

在窗体上画一个文本框，然后编写如下事件过程：

Private Sub Form_Click()

Dim x As Integer

x = Val(InputBox("请输入一个整数"))

Print x + Text1.Text

End Sub

程序运行时，在文本框中输入12，然后单击窗体，在输入对话框中输入34，单击"确定"按钮后，在窗体上显示的内容为______。

A.46

B.123

C.3412

D.1234

点击查看答案

第9题

在窗体上画一个命令按钮和一个文本框，名称分别为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.旅游景点：故宫

点击查看答案