Passer au playerPasser au contenu principalPasser au pied de page
  • 20/02/2010
Aujourd'hui je vous apprends comment faire avec VB8
un système de licence ;)

Niveau : Facile ;)

code :

Sur le boutton 1 :

If TextBox1.Text = ("mdpdelicence") Then
Timer1.Start()
Else : MsgBox("Licence erroné !")
End If

Sur le Timer :

ProgressBar1.Increment(1)

If ProgressBar1.Value = ProgressBar1.Maximum Then
Form2.Show()

Recommandations