請問 listbox 添加資料的問題

Question

Private Sub Command1_Click()
Dim TempFile    As Long
Dim LoadBytes() As ByteTempFile = FreeFileOpen "C:\help.txt" For Binary As #TempFile
ReDim LoadBytes(1 To LOF(TempFile)) As Byte
Get #TempFile, , LoadBytes
Close TempFileText1.Text = StrConv(LoadBytes, vbUnicode)
End Sub上面的代碼可以添加到 Text1，請問我要如還添加到 listbox 內，剩下20分，全給了

Answer 1

list1.additem StrConv(LoadBytes, vbUnicode)^_^

Answer 2

問題是你的C:\help.txt中間是什麼檔，以什麼為分割符？？？
因為你讀text 的時候是自動換行

Answer 3

妳好，help.txt 數據就跟一般的文件一樣，如下：
----------------------------------------------------
 你还没有登录，无法发表回复，请首先登录
 你还没有登录，无法发表回复，请首先登录
 你还没有登录，无法发表回复，请首先登录
 你还没有登录，无法发表回复，请首先登录
 你还没有登录，无法发表回复，请首先登录
----------------------------------------------------
就是這樣的數據...