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

[主观题]

在窗体上画一个文本框，然后编写如下事件过程：Private Sub Text1_KeyPress（KeyAscii As Integer)

在窗体上画一个文本框，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(6，KeyAscii) End Sub 程序运行后，如果在键盘上输入字母“a”，则文本框中显示的内容为 ______。

A．a

B．A

C．aaaaaaa

D．AAAAAAA

查看答案

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

您可能会需要：

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

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

更多“在窗体上画一个文本框，然后编写如下事件过程：Private …”相关的问题

第1题

在窗体上画一个文本框，其名称为Textl，然后编写如下程序：程序运行后，单击窗体，在文本框中显示的内

在窗体上画一个文本框，其名称为Textl，然后编写如下程序：

程序运行后，单击窗体，在文本框中显示的内容是

A.7

B.8

C.9

D.10

点击查看答案

第2题

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

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

点击查看答案

第3题

在窗体上画两个文本框，其名称分别为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文本框中的内容为【】。

点击查看答案

第4题

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

点击查看答案

第5题

在窗体上绘制一个文本框，然后编写如下事件过程：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

点击查看答案

第6题

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

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

A．BeijingChina

B．China

C．Beijing

D．BeijingC

点击查看答案

第7题

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

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

Private Sub Command1_Click()

Text 1="VB programming"

Text 2=Text 1

Text 1="ABCD"

End Sub

程序运行后，单击命令按钮，文本框Text 2中显示的内容为【】。

点击查看答案

第8题

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

点击查看答案

第9题

在窗体上画两个对象名称分别为Text1和Text2的文本框,然后编写如下事件过程: Private Sub Form_Load（） Text1.SelText = "Tianjin" End Sub 运行程序后,在Text1中用鼠标选中文本:Beijing,然后单击Text2,则Text1中的内容为

A.China

B.ChinaBeijing

C.Tianjin

D.ChinaTianjin

点击查看答案

湘ICP备16018319号-4 营业执照

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

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