在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。

Private Sub Combo1_Click（）

C．all ShowItem（Combo1, Label1）

E．nd Sub

Private Sub Combo2_Click（）

C．all ShowItem（Combo2, Label2）

E．nd Sub

Public Sub ShowItem（tmpCombo As ComboBox, tmpLabel As Label）

______.Caption =______.Text

E．nd Sub

[试题]（13）在窗体上画两个组合框，其名称分别为Combo1、Combo2,然后画两个标签，名称分别为Label1、Label2.要求程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下的标签中显示出来，请填空使程序完整。Private Sub Combo1_Click() Call ShowItem(Combo1,Label1) End SubPrivate Sub Combo2_Click() Call ShowItem(Combo2,Label2)End SubPrivate Sub

[试题]在窗体上画一个名称为 Combo1 的组合框，然后画两个名称分别为 Label1 、 Label2 ，标题分别为 /" 城市名称 /" 和空白的标签。程序运行后，在组合框中输入一个新项目并按回车键，如果输入的项目在组合框的列表中不存在，则自动将其添加到组合框的列表中，并在 Label2 中给出提示 /" 已成功添加新输入页。 /" ，如图所示。如果输入的项目已存在，则在 Label2 中给出提示 /" 输入项已在组合框中。 /" 。请填空。Private Sub Combol_KeyP

[试题]（ 10 ） 在窗体上画一个名称为 Combo1 的组合框 ， 然后画两个名称分别为 Label1 、 Label2 ， 标题分别为 “ 城市名称 ” 和空白的标签 。 程序运行后 ， 在组合框中输入一个新项目并按回车键 ， 如果输入的项目在组合框的列表中不存在 ， 则自动将其添加到组合框的列表中 ， 并在 Label2 中给出提示 “ 已成功添加新输入项，如图所示。如果输入的项目已存在，则在 Label2 中给出提示 “ 输入项已在组合中。请填空。

[单选题]在窗体上画一个组合框Combo1和一个命令按钮Command1，然后编写如下两个事件工程：Private Sub form. Activate( a = Combo1. List (1) Print aEnd SubPrivate Sub form_ Load () Combo1. AddItem "11" Combo1. AddItem "22" Combo1. Addltem "33"End Sub窗体上打印出来的结果是______。A．11B．22C．33D．0

[单选题]在窗体上画两个标签和—个命令按钮，其名称分别为Label1、Labd2和Command1，然后编写如下程序：Private Sub func (L As Label) L.Caption="1234"End SubPrivate Sub Form_ Load() Label1. Caption="ABCDE" Label2．Caplion=10End SubPrivate Sub Command1_ Click() a=Val(Label2. Caption) call func(Lab

[试题]在窗体上画两个文本框，其名称分别为Name1和PassWord1，然后编写如下事件过程Private Sub Form_Load（）ShowName1.Text=""Password1.Text=""Password1.SetFocusE．nd SubPrivate Sub Password1_KeyDown（KeyCode As Integer, Shift As Integer）Name1.Text=Name1.Text + Chr（KeyCode - 3）E．nd Sub程序运行后，

[单选题]在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form_Load（）ShowText1.Text = ""Text2.Text = ""Text1.SetFocusE．nd SubPrivate Sub Text1_Change（）Text2.Text = Mid（Text1.Text, 8）E．nd Sub程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是（ ）。A．BeijingC

[单选题]在窗体上画两个文本框，其名称分别为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． Bei

[单选题]在窗体上画两个文本框，其名称分别为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．Beij

[单选题]在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 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．BeijingC