Format d'un textbox : préfixe téléphonique

cs_FASH Messages postés 52 Date d'inscription lundi 3 novembre 2003 Statut Membre Dernière intervention 13 mars 2006 - 27 déc. 2005 à 08:35
BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 - 27 déc. 2005 à 10:06
Bonjour à tous,

J'ai ,dans VB6, un textbox et je voudrais mettre un format en fonction des préfixes téléphoniques. J'ai une table access où sont logés mes numéros.
Voici ce je que je fais lorsque je suis dans l'event 'lostfocus' mais cela ne fonctionne pas.

Si les deux premiers chiffres du textbox sont 04, on utilise un format, sinon on a un autre format.Je n'utilise pas de maskeditbox car cela impliquerait trop de changement dans mon programme.

if mid(text1.text,1,2) = "'04'" then
text1.text=format(text1.text,"mon format")
else
text1.text=format(text1.text,"mon format2")
end if

Que faire?
Merci d'avance

2 réponses

crenaud76 Messages postés 4172 Date d'inscription mercredi 30 juillet 2003 Statut Membre Dernière intervention 9 juin 2006 28
27 déc. 2005 à 09:46
Et alors, ca donne quoi ? ET cela devrait donner quoi surtout ? Est-ce que tes chaines de formatage sont bonnes ?

CR
0
BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 12
27 déc. 2005 à 10:06
je voudrais pas dire de betises, mais il me semble que lorsque l'on fait

text1.text="bla bla"
text2.text="blabla2"

le programme ne passe pas dans le text1_lostfocus.

perso j'essayerais de passer par le text1_change

BasicInstinct
0
Rejoignez-nous