在窗体上画一个列表框、一个文体框及一个按钮,然后编写如下事件过程: 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',则输出结果为