[RESOLVED] Index as Integer

[LawnNinja]

Ok, I have a piece of code that works only is the "mouse over" section but I want the code to occur when you press a command button. Here is the code that I want toi happen when you click a command button.

Text6.Text = Picture4(Index).Left  'corner location
Text7.Text = Picture4(Index).Top  'end

Label17.Caption = X + Picture4(Index).Left 'For location on bg
Label21.Caption = Y + Picture4(Index).Top 'end

I think its because Index is not defined as an interger like it is in the "mouse over" section like so.

 (Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)

How do you get the code at the top to apply to a command button??? I tired adding the above code to the end of commandbutton press and you get errors.