请教：如何将listbox 显示的内容复制到 一个TXT 文件中，说明见详。
目的说明：
1、已经有 list1 ,并且有多行数据
2、已经创建一个command 按钮
要求，通过 command 按钮，可以将 list1 中的内容复制到内存中，自己打开一个 txt 文件，在txt文件中选择粘贴，可以将 list1 中的内容复制到 txt 中。
谢谢大家的支持。
[解决办法]
一定要复制粘贴的话：
Private Sub Command1_Click()
Dim i As Integer, strText As String
For i = 0 To List1.ListCount - 1
strText = strText & IIf(strText = "", "", vbCrLf) & List1.List(i)
Next i
ClipBoard.SetText strText
End Sub
