Favorite Menu Problem

Ok ive coded an intire working editable favorite menu for my software now the problem im having is with the menu index im not quite sure how to get the menu index of which favorite was clicked on the menu.

Private Sub favlistmenu_Click(Index As Integer)

Dim thename As String
Dim thefav As String


thename = menu.favlistmenu(i).Caption
thefav = ReadInI(thename, "address", "C:\Program Files\newproduct\favorites.ini")

MsgBox thename
MsgBox thefav

End Sub

thats my code and the problem is no matter what it keeps making thename the first one on the menu list instead of the one that was clicked how do i fix this problem anyone please?

you mistyped...

thename = menu.favlistmenu(index).Caption

Put:

VB Code:

Option Explicit

At the top of your form and then try and run your code.
This will tell you if you've mistyped any varibles incorrectly.

Wooof

dur fiqures my mistake. Thought i could be used in replace of index. works perfect now :)
thanks guys.

Quote:

---

Originally posted by Wokawidget
Put:

VB Code:

Option Explicit

At the top of your form and then try and run your code.
This will tell you if you've mistyped any varibles incorrectly.

Wooof

---

Theres a thing in the VB Options that places this at the top of every code window automatically for you, forgot what it was called though:confused:

Quote:

---

Originally posted by Madboy
forgot what it was called though:confused:

---

Menu: Tool | Options | Editor and check the Require Variable Declaration.




Bruce.

Thats the one:)

I never use to use Option Explicit, but now i see the importance of it. I always make sure i use it now, least if you do what bruce said, then its easier to delete the Option Explicit then to type it, but i reccomend keeping it there, on the top of every code window:)