Composant (TextEdit) de saisie au format @IP

Question

Bonjour à tous,
Est-ce qqn sait où on peut trouver un composant style TextEdit qui permette la saisie d'une adresse IP comme dans la configuration IP de Windows cad un seul TextEdit avec des points pour séparer mais non modifiables, etc

J'ai déjà parcouru pas mal de sources sur ce site mais je n'en ai pas encore trouvé un qui utiliserait ce composant.

Lolo

cs_raff · Answer

Tu mets quatres textbox, sur les sépare par des points.  Les propriétés maxlengh des textbox sont à 3.  Puis ce code :

Private Function SwitchBox(str As String, ctr As TextBox) As Boolean
  
  If Len(str) = ctr.MaxLength Then
    SwitchBox = True
  Else
    SwitchBox = False
  End If
  
End Function

Ensuite tu appelles la fonction dans l'événement 'keyUp de chaque textbox en spécifiant ou ira le focus par la suite :

Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
      
  If SwitchBox(Text1.Text, Text1) = True Then
    
    Text2.SetFocus
  End If
    
End Sub

et voilà !

cs_dlaurent · Answer

Merci bien pour cette solution.
C'est une approche intéressante mais je pensais qu'il existait un composant tout fait qui aurait eu l'apparence d'un seul Text Edit comme dans les paramètres réseau.

Lolo

cs_raff · Answer

rien ne t'empêche de mettre les textbox sans bordure et flat, puis de les mettre sur un label de la même couleur dans lequel tu insères les points...d'ailleurs, tu as remarqué, dans les paramètres réseaux, lorsque l'option n'est pas enable, il y a comme quatre zones grises, et autour un label blanc.........

Composant (TextEdit) de saisie au format @IP

3 réponses

Discussions similaires