在窗体．上画一个列表框、一个文本框及一个按钮，然后编写如下事件过程： Prirate Sub Form_Loab() List.Addltem"357" Llst.Addltem"246" List.Addltem"123" List.Addltem"456" TEXTl.Text="" End ub Private Sub Commandl_Click() List.LiSdndex=3 Print List.Text+Textl.Text

A．789123

B．456789

C．789456

D．1245