Testo verticale

Da Gambas-it.org - Wikipedia.

Vediamo come ottenere una scritta disposta verticalmente mediante oggetti di testo come Label e TextLabel, aventi larghezze di qualsiasi dimensione, e mediante codice.


Con le TextLabel useremo il codice HTML:

Public Sub Button1_Click()

  TextLabel1.Text = "T<BR>e<BR>s<BR>t<BR>o<BR><BR>v<BR>e<BR>r<BR>t<BR>i<BR>c<BR>a<BR>l<BR>e"

End


Invece con le semplici Label possiamo usare il carattere escape \n :

Public Sub Button1_Click()

  Label1.Text = "T\ne\ns\nt\no\n\nv\ne\nr\nt\ni\nc\na\nl\ne"

End


...oppure Chr(10). Vediamo una soluzione mista:

Public Sub Button1_Click()

  Label1.Text = "T" & Chr(10) & "e\ns" & Chr(10) & "t\no" & Chr(10) & "\nv\ne" & Chr(10) & "r\nt" & Chr(10) & "i\nc\na" & Chr(10) & "l\ne"

End


In tutti e tre i casi avremo questo risultato:
T
e
s
t
o

v
e
r
t
i
c
a
l
e