[RESOLVED] Index as Integer

[gavio]

Create a module-level variable and store "Index" in there. Something like:

Option Explicit
    Private myIndex As Integer
 
Private Sub Picture4_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
    myIndex = Index
End Sub
 
Private Sub Command1_Click()
    'use the "myIndex" here...
End Sub