Differenze tra le versioni di "Testo verticale"

Da Gambas-it.org - Wikipedia.
 
(Una versione intermedia di uno stesso utente non è mostrata)
Riga 20: Riga 20:
 
   
 
   
 
  End
 
  End
 
+
...oppure "<FONT Color=red>Chr(10)</font>".
 
+
<BR>Vediamo una soluzione mista:
...oppure "<FONT Color=red>Chr(10)</font>". Vediamo una soluzione mista:
 
  
 
  Public Sub Button1_Click()
 
  Public Sub Button1_Click()

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