vb Combo1.AddItem

来源:百度知道 编辑:UC知道 时间:2024/06/25 15:52:31
c:\www.txt
比如www.txt里的文件是:
123
似的
所得税
是“
怎么把他读到Combo1.AddItem

Private Sub Command1_Click()
Combo1.Clear
Open "c:\www.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, txt
Combo1.AddItem txt
Loop
Close #1
Combo1.Text = Combo1.List(0)
End Sub