VB调用文本到combobox下拉列表,并将列表中的信息输出

2024-12-02 08:57:49
推荐回答(1个)
回答1:

Dim strInfo As String
strInfo = ComboBox1.SelText
Open "d:\temp1.txt" For Append As #1
Write #1, strInfo & Chr(13)
Close #1
MsgBox "写入完毕"