mon chrono vb 6

1 post / 0 new
mgz_beqr
mon chrono vb 6

Bonjour,
je vous explique je viens de creer un chrono en VB6 mais il ne fonctionne pas pourqoui il refuse de prendre la commande elseif
pourquoi ? voila mon code

Private Sub Cmdpause_Click()
If Cmdpause.Caption = "Pause" Then
Timer1.Enabled = True
Lbl2 = lbl1
Cmdpause.Caption = "Restart"
Else
Cmdpause.Caption = "pause"
Timer1.Enabled = True
lbl3.Caption = lbl1

Cmdpause.Caption = "pause"
Timer1.Enabled = True
lbl4.Caption = lbl1
End If
End Sub
serait il possible d'impoter les resultats sous forme html ?
d'avance merci et à bientôt