problem med at gå frem og tilbage i billeder [VB6]

Hej

jeg har en form hvor jeg har en Picture box og en timer plus en start knap det virker fint

jeg vil så gerne have lavet sådan at man kan gå frem og tilbage i billederne, men jeg kan ikke rigtig få det til at funger,
min kode er nedenfor det er Command4 og Command3 det er galt med.

hvordan fixer man den.

Timer1 = True
End Sub

Private Sub Command2_Click()
Shell "explorer jubi\", vbNormalFocus

End Sub

Private Sub Command3_Click()
iCount = iCount + 1
    If iCount > 10 Then
        iCount = 1
    End If
    Picture1.Picture = LoadPicture("jubi " & "(" & iCount & ")" & ".jpg").Picture
End Sub

Private Sub Command4_Click()
iCount = iCount - 1
    If iCount <= 0 Then
        iCount = 1
    End If
    Picture1.Picture = LoadPicture("jubi " & "(" & iCount & ")" & ".jpg").Picture
End Sub

Private Sub Form_Load()

End Sub

Sub Timer1_Timer()
    Static iCount As Integer

    iCount = iCount + 1
    Picture1.Picture = LoadPicture("jubi " & "(" & iCount & ")" & ".jpg")
    If iCount >= 10 Then
        iCount = 0
    End If

End Sub