[填空题]在窗体上画两个组合框，其名称分别为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

更多"在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两"的相关试题:

[填空题]在窗体上画两个组合框，其名称分别为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

查看答案

[填空题]在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2，如图所示，程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。[*]Private Sub Combo1_Click(　) 　　　Call ShowItem(Combo1, Label1) 　　End Sub 　　Private Sub Combo2_Click（　）　　　Call ShowItem(Combo2, Label2) 　　End Sub 　　Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label) 　　　【10】　.Caption =　【11】　.Text 　　End Sub

查看答案

[单项选择]在窗体上画一个组合框，一个命令按钮和一个文本框，其名称分别为Combo1，Command1和Text1，然后编写如下事件过程：
Private Sub Form_Load（　）
Combo1. AddItem "AAAAA"
Combo1. AddItem "BBBBB"
Combo1. AddItem "CCCCC"
Combo1. AddItem "DDDDD"
Combo1. AddItem "EEEEE"
End Sub
程序运行后，如果单击命令按钮，则在文本框中显示组合框的项目“CCCCC”。为了实现该操作，在命令按钮的Click事件过程中应使用的语句为( )。
A. Text1. Text = Combo1. List (2)
B. Text1. Text = Combo1. Text
C. Text1. Text = Combo1. List (3)
D. Text1. Text = Combo1. ListIndex

查看答案

[单项选择]在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，
然后编写如下程序：
Private Sub func(L As Label，ByVal a As Integer)
L.Caption="1234"
a=a*a
End Sub
Private Sub Form_Load（　）
Labell.Caption="ABCD"
Label2.Caption=10
End Sub
Private Sub Command1_Click（　）
a=Val(Label2.Caption)
Call func(Labell，
A. 1234和100
B. ABCD和100
C. 1234和10

查看答案

[单项选择]

在窗体上画一个命令按钮和两个标签，其名称分别为Command1、Label1和Label2，然后编写如下事件过程；
Private Sub Command1_Click（　）
a=0
For i=1 To 10
a=a+1
b=0
For j＝1 To 10
a=a+1
b=b+2
Next j
Next i
Label1.Caption=Str(a)
Label2.Caption=Str(b)
End Sub
程序运行后，单击命令按钮，在标签Label1和Label2中显示的内容分别是（）。

A. 10和20
B. 20和110
C. 200和110
D. 110和20

查看答案

[单项选择]在窗体上画两个标签和一个命令按钮，其名称分别为Label1、Label2和Command1，然后编写如下程序：
Private Sub func(L As Label，ByVal a As Integer)
L.Caption="1234"
a=a*a
End Sub
Private Sub Form_ Load（　）
Label1.Caption="ABCD"
Label2.Caption=10
End Sub
Private Sub Command1_Click（　）
a=Val(Label2.Caption)
Call func (Label1，
A. 1234和100
B. ABCD和100
C. 1234和10

查看答案

我来回答:

提交