Ottenere il valore ASCII di un carattere: differenze tra le versioni
Vai alla navigazione
Vai alla ricerca
(Creata pagina con "Per ottenere il valore ASCII dei singoli caratteri alfanumerici e di punteggiatura, appartenenti ad un testo, è possibile usare una variabile vettoriale di tipo "Byte[]": Pu...") |
Nessun oggetto della modifica |
||
| Riga 1: | Riga 1: | ||
Per ottenere il valore ASCII dei singoli caratteri alfanumerici e di punteggiatura, appartenenti ad un testo, è possibile usare una variabile vettoriale di tipo "Byte[]" | Per ottenere il valore ASCII dei singoli caratteri alfanumerici e di punteggiatura, appartenenti ad un testo, è possibile usare alcune modalità. | ||
===La funzione "[[Asc|Asc()]]" se si tratta di un solo valore-byte=== | |||
Public Sub Main() | |||
Print Asc("a") | |||
End | |||
===Usare una variabile vettoriale di tipo "Byte[]"=== | |||
Public Sub Main() | Public Sub Main() | ||
| Riga 10: | Riga 20: | ||
End | End | ||
===Usare una variabile stringa e la funzione "VarPtr()"=== | |||
Private s As String | Private s As String | ||
| Riga 29: | Riga 41: | ||
'''End''' | '''End''' | ||
===Usare la funzione "Alloc()"=== | |||
Public Sub Main() | Public Sub Main() | ||
Versione delle 15:22, 29 ott 2021
Per ottenere il valore ASCII dei singoli caratteri alfanumerici e di punteggiatura, appartenenti ad un testo, è possibile usare alcune modalità.
La funzione "Asc()" se si tratta di un solo valore-byte
Public Sub Main()
Print Asc("a")
End
Usare una variabile vettoriale di tipo "Byte[]"
Public Sub Main()
Dim l As Long
Dim bb As Byte[]
bb = Byte[].FromString("Gambas")
l = Long@(bb.Data)
Print l
End
Usare una variabile stringa e la funzione "VarPtr()"
Private s As String
Public Sub Main()
Dim p As Pointer
Dim p1, p2 As Pointer
s = "Gambas"
p1 = VarPtr(s)
p2 = Pointer@(s)
' Mostra l'intero contenuto in formato testuale:
Print p2
End
Usare la funzione "Alloc()"
Public Sub Main()
Dim p As Pointer
p = Alloc("Gambas")
Print Hex(Long@(p)), Long@(p)
Free(p)
End