format textbox

[DAMIEN]

bonsoir
je voudrai qu'il se mette a la fin
ex 121250z



Private Sub TextBox11_Change()
TextBox11 = Format(TextBox11, "z")
End Sub


merci

damien

 

[michel]

bonsoir Damien

je ne comprends pas ce que tu souhaites obtenir
est ce que tu peux donner quelques infos complementaires ?

bonne soiree
michel

 

[DAMIEN]

bonsoir michel
je voudrai que quand je tape 121250 dans mon textbox
il apparaise 121250Z.

merci
damien

 

[michel]

rebonsoir Damien

dans l'exemple ci dessous , un "z" est ajouté dans le textbox quand 121250 est saisi

Private Sub TextBox1_Change()
If TextBox1 = "121250" Then TextBox1 = TextBox1 & "z"
End Sub

bonne soirée
michel