Discussion :

[gryffondor8392]

J'aimerais savoir s'il est possible d'afficher dans un label un texte à la verticale.

Merci par avance de votre aide.

[petit rabot]

Exemple facilement trouvé sur google

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Form_Load()
Dim a As String
Dim b As String
Dim s As String
Dim i
 
a = "Coucou"
 
For i = 1 To Len(a)
     b = Mid$(a, i, 1) & vbCrLf
     s = s & b
Next
 
Label1 = s
 
End Sub

[l_autodidacte]

Il y a aussi la possibilité d'utiliser le Composant label Vertical