Question

vb 如何把一个文本文件里的内容粘贴到list1里?

有一个文本文件,里面有很多行内容,我先把这些内容复制出来.窗体上有一个'粘贴'按钮,还有一个list1列表框.我点击这个'粘贴'按钮之后,刚才复制的内容就粘贴到这个list1列表框里. 请问这个'粘贴'按钮的过程如何写?谢谢.

Answer 1

Private Sub Command1_Click()
Open "c:\1.txt" For Input As #1
Do
Input #1, a
With List1
.AddItem a
End With
Loop Until EOF(1)
Close #1
End Sub
符合要求吗。。

Answer 2

如果复制的内容被放到剪贴板中，那么就可以把剪贴板中的内容添加到list列表框中：private sub command1_click() List1.AddItem Clipboard.GetTextend sub你要复制的内容有很多行的话，你可以用文本框放置多行的内容：private sub command1_click() text1.text=clipboard.gettextend sub

Answer 3

直接读取 文本里的信息 存在到一个变量里 然后添加到list里就好了

Answer 4

我是手机，写代码不方便，思路是，将文本文件，一行读出来，添加到列表框，再读下行，如此反复，即可