Alors en fait, ça marche sans marcher... Je m'explique. Quand je lance le bouzin normalement, il ne veut absolument pas remplacer le caractère alors que si je le fais en pas-à-pas, il le fait -_-"
voila ce que ca donne:
Code :
- Private Sub adresse_IP_KeyPress(KeyAscii As Integer)
- Dim val As String
- Dim temp As String
- If KeyAscii = 46 Then
- val = Chr(46)
- temp = Replace(val, ".", "." )
- Adresse_IP.Value = Adresse_IP.Value & temp
- End If
- End Sub
|
(Je sais c'est moche mais bon à la guerre comme à la guerre)
Un peu bizzare cette histoire....Et quand je tape le point au dessus du point-virgule, il me le met ! Et comble de l'ironie, c'est le même code ASCII....
Message édité par alkashee le 02-06-2008 à 11:44:06