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

[主观题]

在窗体上画两个文本框，名字分别为Text1和Text2，然后编写下列程序。程序运行后，如果在文本框 Text2

中输入lmn，那么在文本框Text1中显示的内容将是【】。 Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyPress(KeyAseii As Integer) Text1.Text=Text1.Text+Chr(KeyAscii-5) End Sub

查看答案

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

您可能会需要：

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

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

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

第1题

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

在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command1 Click() Text1．Text=InputBox("请输入数据1") TextText=InputBox("请输入数据2) End Sub 程序运行后，如果单击命令按钮，将先后显示两个输入对话框，在两个输入对话框中分别输入123和abc，则两个文本框中显示的内容分别为【】和【】。

点击查看答案

第2题

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

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

点击查看答案

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

在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1、Label2，如

图所示。程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。

在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1 Privte Sub Combo1_Click() Call Showltem(Comb01.Label1) End Sub Private Sub Combo2_Click() Call Showltem(ComboLabe12) End Sub Public Sub Showhem(tmpCombo As ComboBox，tmpLabd As Label)，【】Caption=【】.Text End Sub

点击查看答案

第5题

在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1、 Labe12。要

求程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空使程序完整。 Private Sub Comb01_Click() Call ShowItem(Combo1，Labe11) End Sub Private Sub Combo2_Click() Call ShowItem(Combo2, Labe12) End Sub Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label) ______.Caption=______.Text End Sub

点击查看答案

第6题

在窗体上画一个名称为Text的文本框，编写以下代码PrivateSubText1KeyPress（KeyAscllAsInteger)IfKeyAscil65OrKeyAscii＞90ThenmsgBox请输入大写字母KeyAsc=0EndifEndsub以下能说明该事件过程正确是（)。

A.要求文本框只能接收数字的输入

B.要求文本框只能接收大写字母的输入

C.要求文本框只能接收65到90之间的数值的输入

D.要求文本框只能接收小写字母的输入

点击查看答案

第7题

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Load（)

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Load() Text1.Text="计算机" End Sub Private Sub Text1_Change() Picturel.Print"等级考试" End Sub 程序运行后，在文本框中显示的内容是【】，而在图片框中显示的内容是【】。

点击查看答案

第8题

在窗体上画一个文本框和—个图片框，然后编写如下两个事件过程： Private Sub Form_Click（)

在窗体上画一个文本框和—个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1.Text="VB程序设计" End Sub Private Sub Text1_Change() Picture1.Print"VB programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是【】，而在图片框中显示的内容是【】。

点击查看答案

第9题

在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及Caption，属性分别为“城市

名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示“已成功添加输入项”，如图16-3所示；如果存在，则在Label2中给出提示“输入项已在组合框中”。请在【】、【】和【】处将程序补充完整。 Private Sub Comhel【】(KeyAscii As Integer) If KeyAseii=13 Then For i=0 To Combol. ListCount-1 If Combol. Text=【】Then LabelCaption="输入项已在组合框中" Exit Sub End If Next i LabelCaption="已成功添加输入项" Combol.【】Combol. Text End If End Sub

在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及Caption

点击查看答案

第10题

在窗体上画两个文本框，然后编写程序。程序运行后，如果在第一个文本框中输入A、B、 C、D或a、b、c、d，则

在第二个文本框中显示EFDH。请完善下列程序。 Private Sub Form_Load() Show Text1．Text=" " TextText=" " Text1．SetFocus End Sub Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) TextText=【】 End Sub

点击查看答案

湘ICP备20004669号-2 营业执照

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

举报/反馈/投诉邮箱：deng＃ujigu.com（请将＃替换成@）