Bonsoir jack, didier09, le Forum.
La propriété Caption dont tu parles correspondrait plus à un contrôle Label plutôt qu'un TextBox...
Pour créer des sauts de ligne dans un TextBox (propriété Text) ou dans un Label (propriété Caption), tu peux utiliser les constantes VB suivantes :
[ol][ul][li]
vbCrLf équivalent à Chr(13) + Chr(10)
Combinaison des caractères de retour chariot et de saut de ligne [/li]
[li]
vbCr équivalent à Chr(13) Caractère de saut de paragraphe[/li]
[li]
vbLf équivalent à Chr(10) Caractère de saut de ligne[/li]
[li]
vbNewLine équivalent à Chr(13) + Chr(10) sur PC ou Chr(13) sur Macintosh.[/li][/ul][/ol]
Attention toutefois, pour que ton
TextBox 'digère' les sauts de ligne, il faut également mettre la propriété
MultiLine = True
Soit un Userform avec un TextBox1 et un Label1 :
Private Sub UserForm_Initialize()
With TextBox1
.MultiLine = True
.Text = 'Pour créer des sauts' & _
vbLf & 'de lignes dans le TextBox,' & _
vbLf & 'il suffit d'utiliser les caractères' & _
vbLf & 'vbLf = chr(10),' & _
vbCr & 'vbCr = chr(13),' & _
vbCrLf & 'vbCrLf = chr(10) + chr(13),' & _
vbNewLine & 'ou vbNewLine = chr(10) + chr(13)'
End With
Label1.Caption = 'Pour créer des sauts' & _
vbLf & 'de lignes dans le Label,' & _
vbLf & 'il suffit d'utiliser les caractères' & _
vbLf & 'vbLf = chr(10),' & _
vbCr & 'vbCr = chr(13),' & _
vbCrLf & 'vbCrLf = chr(10) + chr(13),' & _
vbNewLine & 'ou vbNewLine = chr(10) + chr(13)'
End Sub
Cordialement,
Message édité par: myDearFriend!, à: 10/11/2005 21:10