Invité
Invité
 | | Sujet: Caractères Maximum Lun 21 Déc 2009 - 20:24 | |
| Salut à tous ! Je regardais dans les propriétés de l'edit et je suis tombé là dessus. - Code:
-
label change,rien:dim i
edit 1
text 1,"Texte Choisi"
on_change 1,change
print_locate 5,22
print "Nombre de caractère(s) maximum :"
spin 2
top 2,41
max 2,20:min 2,1
position 2,1
end
change:
i=len(text$(1))
text 1,mid$(text$(1),i,position(2))
on_change 1,rien
return
rien:
text 1,mid$(text$(1),i,position(2))
return |
|
jjn4
Nombre de messages : 2747
Date d'inscription : 13/09/2009
| | Sujet: ???????????? Lun 21 Déc 2009 - 23:43 | |
| C'est un programme assez confus ! Et je dirai... Et alors ?  | |
|
Calendrier