在窗体上画一个名称为Listl的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是A．Private Sub List1_Click() Label1.Caption=List1.ListIndex End SubB．Private Sub List1-Click() Label1.Name=List1.ListIndex End SubC．Private Sub List1_Click() Labe

题目

在窗体上画一个名称为Listl的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是

A．Private Sub List1_Click() Label1.Caption=List1.ListIndex End Sub

B．Private Sub List1-Click() Label1.Name=List1.ListIndex End Sub

C．Private Sub List1_Click() Label1.Name=List1.Text End Sub

D．Private Sub List1_Click() Label1.Caption=List1.Text End Sub

相似考题

1.在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干国家的名称，当单击别表中的某个国家名时，在标签中显示选中国家的名称。下列正确实现上述功能的程序是。A. Private Sub List1_Click() Labell.Caption=List1.ListIndex End SubB. Private Sub List1_Click() Labell.Name=List1.ListIndex End SubC. Private Sub List1_Click() Labell.Name=List1.Text End SubD. Private Sub List1_Click() Labell.Caption=List1.Text End Sub

2.在窗体上画一个名称为Listl酌列表框，一个名称为Labell的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是：______。A． Private Sub Listl_Click() Labell.Caption=Listl.ListIndex End SubB．Private Sub Listl_Click() Labell.Name=Listl.ListIndex End SubC．Private Sub Listl_click() Labell.Name=Listl.Text End SubD．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub

3.在窗体上画一个名称为Listl的列表框，一个名称为Labell的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。A．Private Sub Listl_Click() Labell.Capfion=Listl.Listlndex End SubB．PrivateSubLial click() Labell.Name=Listl.Listlndex End SubC．PrivateSubListl click() Labell.Name=Listl.Text End SubD．Private Sub Listl_Click() Labell.Caption=Listl.Text End Sub

4.3在窗体上画一个名称为List1的列表框，一个名称为Labe11的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是( )。A．B．C．D．

更多“在窗体上画一个名称为Listl的列表框,一个名称为Label1的标签。列表框中显示若干城市的名称。当单击 ”相关问题

  • 第1题：

    在窗体上绘制一个名称为List1的列表框，一个名称为Labe11的标签，列表框中显示若干个项目。当单击列表框中的某个项目时，在标签中显示被选中项目的名称。下列能正确实现上述操作的程序是

    A．PriVate Sub List1_Click() Labell.CaptiOn=List.ListIndex End Sub

    B．PriVate Sub List1_Click() Labell.Name=listl.ListIndex End Sub

    C．Private Sub List1_Click() Labell.Name=Listl.Text End Sub

    D．Private Sub List1_Click() Labell.Caption=List1.Text End Sub


    正确答案：D
    解析：本题考查列表框的属性。列表框属性是历年考试重点，考生应多做相关练习。本题要注意区分ListIndex与Text属性。 ListIndex指被选中项的下标，而Text表示被选中项的内容。List1.Listlndex表示被选中的项本身，而 List1.Text表示被选中项的内容，故本题正确答案是A。同时本题还涉及Name与Caption的区别，考生也要注意区分。

  • 第2题：

    在窗体上画一个名称为Lablel的标签和一个名称为Listl的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Labell中显示所选中的项目，如图所示。请在______处填入适当的内容，将程序补充完整。

    Private Sub Form. load()

    Listl.AddItem “北京”

    List1.AddItem “上海”

    List1.AddItem “河北”

    End Sub

    Private Sub ______()

    Labell.Caption=______

    End Sub


    正确答案：List1 DblClick或 Form1.Listl DblCiick或Me.List1 DblClick Listl.Text 或 Listl 或 Forml.Listl.Text 或 Me.Listl.Text或Forml.Listl或Me.Listl
    List1 DblClick或 Form1.Listl DblCiick或Me.List1 DblClick , Listl.Text 或 Listl 或 Forml.Listl.Text 或 Me.Listl.Text或Forml.Listl或Me.Listl 解析：由于本程序要响应列表框的双击事件，故第一处应填：Listl_DblClick。指明List1所属的窗体也可以，上面的答案是等价的。列表框的Text属性返回被选中的列表框的内容，根据题意，第二处应该填：List1.Text。同时由于Text属性是列表框的属性值，可以省略不写，故上述答案是等价的。

  • 第3题：

    在窗体上画一个名称为List1的列表框，一个名称为Labe11的标签，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名从列表框中消失，并在标签中显示出来。下列能正确实现上述操作的程序是( )。

    A．

    B．

    C．

    D．


    正确答案：C

  • 第4题：

    在窗体上画一个名称为List1的列表框，一个名称为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是

    A．Private Sub List1 Click() Label1.Caption＝List1.List- Index End Sub

    B．Private Sub List1_Click() Label1.Name＝List1. ListIn- dex End Sub

    C．Private Sub List1 Click() Label1.Name＝List1.Text End Sub

    D．Private Sub List1_Click() Label1.Caption=List1.Text End Sub


    正确答案：D
    解析：要实现在标签上显示选中城市的名称，很容易想到需使用标签的Caption属性。标签的Caption属性我们前面已经介绍过。怎样获取选中城市的名称要结合列表List的属性来考虑。其中Text属性表示最后选中列表项的内容。故正确语句应为Label1.Caption＝List1.Text。选项D正确。

  • 第5题：

    在窗体上画一个名称为Labell的标签和一个名称为Listl的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Label中显示所选中的项目，如下图所示。请在______和______处填入适当的内容，将程序补充完整。

    Private Sub Form_Load()

    List1.AddItem "北京"

    List1.AddItem "上海"

    List1.AddItem "河北"

    End Sub

    Private Sub List ______()

    LabeCaption = ______

    End Sub


    正确答案：DblClick Listl.Text
    DblClick , Listl.Text

相关内容