Retrieving listbox items using GetSetting? 2

[r3b00t]

Ive got a project where the user is asked for three responses, these responses, when the appropriate button is clicked, are added to a listbox on a second form and the user can view the items by pressing a button to display the second form.

The problem i have is, when the program is closed and re-opened the items that were in the listbox are now gone.

Ive been messing about with some code using the SaveSetting and GetSetting functions but havent been able to get it right yet.

Heres what ive got so far

Private Sub Form_Unload(Cancel As Integer)
SaveSetting App.EXEName, "Settings", "LIST", list1.ListIndex
End Sub

and on the second form

Private Sub Form_Load()
For X = 0 To list1.ListCount - 1
list1.AddItem (X)
Next
On Error GoTo aaron:
list1.ListIndex = GetSetting(App.EXEName, "Settings", "LIST&quot
aaron:
End Sub

Can any of you guys please help?!?

Cheers

r3b00t

 

[r3b00t]

Yeah im using alphanytz's code because your code keeps producing the error message subscript out of range on this line List1.AddItem aryList(lngCount).

How could i remove the space in alphanytz's code?

Also how would i go about placing a small jpeg in the title bar of the app???

Thanx

r3b00t

 

[johnwm]

Instead of

For lngCount = 0 To lngUpper   'Revised

try

For lngCount = 0 To lngUpper - 1  'Revised twice

Suggest you start your other question in a new thread Let me know if this helps
________________________________________________________________
If you are worried about how to post, please check out FAQ222-2244 first

'There are 10 kinds of people in the world: those who understand binary, and those who don't.'

 

[johnwm]

Also thanks for stars - much appreciated! Let me know if this helps
________________________________________________________________
If you are worried about how to post, please check out FAQ222-2244 first

'There are 10 kinds of people in the world: those who understand binary, and those who don't.'

 

[CestusGW]

If you're referring to the standard icon in the upper left window of your form, you can only place icon files there (*.ico) and you specify these through the VB Interface (a project setting or form window setting I think) Greg W
wolgemga@aecl.ca

 

[r3b00t]

Thanx again johnwm, much appreciated!!!

Regards

r3b00t