Differenze tra le versioni di "Testo verticale"
Da Gambas-it.org - Wikipedia.
| (3 versioni intermedie di uno stesso utente non sono mostrate) | |||
| Riga 5: | Riga 5: | ||
Con le <B>TextLabel</b> useremo il codice HTML: | Con le <B>TextLabel</b> 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" | 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 <B>Label</b> possiamo usare il carattere ''escape'' <FONT Color= | + | Invece con le semplici <B>Label</b> possiamo usare il carattere ''escape'' <FONT Color=red>\n</font> : |
| − | + | Public Sub Button1_Click() | |
Label1.Text = "T\ne\ns\nt\no\n\nv\ne\nr\nt\ni\nc\na\nl\ne" | Label1.Text = "T\ne\ns\nt\no\n\nv\ne\nr\nt\ni\nc\na\nl\ne" | ||
| − | + | End | |
| + | ...oppure "<FONT Color=red>Chr(10)</font>". | ||
| + | <BR>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" | 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 | |
Versione attuale delle 16:52, 29 giu 2024
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
