How to write listbox items into text file ?

This topic has 3 replies, 4 voices, and was last updated 15 years ago by String.

Viewing 4 posts - 1 through 4 (of 4 total)

Author

Posts
November 18, 2008 at 3:55 pm #187473
method
Member
Hi all . Could any one show me how i can write the listbox items in to text file ? So far i all know to how to loop the listbox items. I want to the button re write all the listbox each time i press it.Looking forward for reply.Thanks
```
Private Sub Command8_Click()

Dim i As Long



For i = 0 To List1.ListCount - 1

'If List1.Selected(I) = True Then

'MsgBox List1.Text

MsgBox List1.List(i)

'End If

Next

End Sub
```
November 18, 2008 at 8:51 pm #187476
String
Member
You can use this function to add all list items to a txtbox. Each item will be seperated by a comma [ , ]
```
Function Lst2Str(List As listbox)

Dim X As Integer

Dim Z As String



For X = 0 To List.ListCount - 1

Z = Z & "," & List.List(X)

Next

Lst2Str= Z



End Function
```
In your command button use:
```
Text1 = Lst2Str(List1)
```
Replace “Text1” and “List1” with what ever you need.
That help you any?
November 18, 2008 at 9:43 pm #187475

Chike
Member

Here some gerber for ya.

November 20, 2008 at 4:11 am #187474

AhFox
Member

Here is an application that suitable your needs:
Author

Posts

Related

Viewing 4 posts - 1 through 4 (of 4 total)

You must be logged in to reply to this topic.