ini file and listbox

[Ch4s3t0ph3r]

Option Explicit
 
Private Sub Form_Load()
  Dim x As Integer, str$
  For x = 0 To 3
    List1.AddItem x * 7
  Next x
  For x = 0 To List1.ListCount - 1
    str = str & List1.List(x) & ";"
  Next x
  MsgBox str
  str = Left(str, Len(str) - 1)
  MsgBox str
End Sub

im not understanding what that is for or where to put it, i did for forget to mention that i am taking info from one form and this is saved to the ini, then it can only be viewable on form2 which has the same setup and it all works but the only thing is that the listbox doesnt recieve all the info that is in the ini file

[dglienna]

That's just the sample that I whipped up, which cut off a lot of the information when I used the MID() statement that you had, so I changed it around, then added the correction for your form.

If you paste that code into a new project, and run it, you will see that it works correctly. All items are displayed.

You can use Form2.Text1.text from Form1 to get the value.

[MartinLiss]

That's just the sample that I whipped up, which cut off a lot of the information when I used the MID() statement that you had, so I changed it around, then added the correction for your form.

If you paste that code into a new project, and run it, you will see that it works correctly. All items are displayed.

You can use Form2.Text1.text from Form1 to get the value.

So does mine if you had bothered to try it.

[dglienna]

I typed it in wrong. When I tried the mid statement, it messed up my data, so I used left. I added the ";" to the end, and removed it. You added ";" at the beginning of the data, and the Mid() would have worked.

I assumed that Ch4s3t0ph3r did try it, though.