Differenze tra le versioni di "Testo verticale"
Da Gambas-it.org - Wikipedia.
(Nuova pagina: Vediamo come ottenere il testo disposto verticalmente mediante oggetti di testo come ''Label'' e ''TextLabel'', aventi larghezze di <SPAN style="text-decoration:underline">qualsiasi</s...) |
|||
| (6 versioni intermedie di uno stesso utente non sono mostrate) | |||
| Riga 1: | Riga 1: | ||
| − | Vediamo come ottenere | + | Vediamo come ottenere una scritta disposta verticalmente mediante oggetti di testo come ''Label'' e ''TextLabel'', aventi larghezze di <SPAN style="text-decoration:underline">qualsiasi</span> dimensione, e mediante codice. |
| + | |||
| + | |||
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 ''\n | + | 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: | |
| − | ...oppure | ||
| − | + | 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 15: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
