BUng Saef anda bisa coba contoh berikut ini:
Private Sub Command1_Click()
Dim I As Integer
Open "C:\Windows\Desktop\IsiList.txt" For Output As #1
For I = 0 To List1.ListCount - 1
Print #1, List1.List(I)
Next I
Close #1
MsgBox "OK"
End Sub
On 18/08/07, SAE <[EMAIL PROTECTED]> wrote:
>
> salam
>
> mohon bantuan kepada rekan semua
>
> saya sedang membuat program denga program VB6...
> dimana program itu ada tampilan data di listbox
>
> saya ingin data yang ada di listbox itu saya simpan ke dalam file text,
> dan bisa di buka di notepad...
>
> tolong bantu saya
>
>
> terimkasih
> =saef=
>
> ------------------------------
> Park yourself in front of a world of choices in alternative vehicles.
> Visit the Yahoo! Auto Green
> Center.<http://us.rd.yahoo.com/evt=48246/*http://autos.yahoo.com/green_center/;_ylc=X3oDMTE5cDF2bXZzBF9TAzk3MTA3MDc2BHNlYwNtYWlsdGFncwRzbGsDZ3JlZW4tY2VudGVy>
>
>
>
--
Best Regard,
[zZzz]
