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

admin2010-03-30  26

问题 在窗体上画两个组合框,其名称分别为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)
        ______.Caption=______.Text
   End Sub

选项

答案tmpLahe1, tmpCombo

解析 标签控件的Caption属性显示标签中的内容,组合框的 Text属性显示选择或输入的数据项的内容,要把选择的项目显示在标签中,应该是用组合框的Text为标签的Caption属性赋值。用户定义的ShowItem过程中定义了两个控件型参数(tmpCombo和tmpLabe1),因此,在该过程中使用tmpCombo和tmpLabe1来表示组合框和标签控件。
转载请注明原文地址:https://jikaoti.com/ti/G7q0FFFM
0

最新回复(0)