在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程: Private Sub Form Loab() List.AddItem"357" List.AddItem"246" List.AddItem"123" List.AddItem"456" TEXT1.Text="" End Sub Private Sub Command1_Click() List.Listindex=3 Print List.Text1+Text1.Text End Sub 程序运行后,在文本框中输入"789",然后双击列表框中的"456",则输出结果为