user_mobilelogo

 

Private Sub TextBox1_Change()
Dim max
max = 50
If Len(TextBox1.Value) > max Then TextBox1.Value = Left(TextBox1.Value, max)
End Sub

Statistiques

Aujourd'hui2122
Hier2514
Cette semaine12536
Ce mois70316
Total depuis 200411584585

13
visiteurs actuellement en ligne

29 mai 2020