在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表中添加若干列表项。当双击列表框中的某个项目时，在标签Labe1中显示所选中的项如图所示。请在空白处填入适当的内容，将程序补充完整。　　Private Sub Form

admin2009-01-15 135

问题在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表中添加若干列表项。当双击列表框中的某个项目时，在标签Labe1中显示所选中的项如图所示。请在空白处填入适当的内容，将程序补充完整。
　　Private Sub Form _Load( )
　　　　List1．AddItem"北京"
　　　　List1．Addltem"上海"
　　　　List1．AddItem"河北"
　　End Sub
　　Private Sub List1【】( )
　　　　Labe1．Caption=【】
　　End Sub