Differenze tra le versioni di "Rimuovere da una stringa uno o più caratteri del codice ASCII esteso"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "I caratteri appartenenti al codice ''ASCII esteso'', sono quei caratteri con codice superiore al valore 127. Per rimuovere da una stringa uno o più caratteri appartenenti al...") |
(Nessuna differenza)
|
Versione delle 18:03, 28 dic 2015
I caratteri appartenenti al codice ASCII esteso, sono quei caratteri con codice superiore al valore 127.
Per rimuovere da una stringa uno o più caratteri appartenenti all'ASCII esteso, è possibile utilizzare il seguente codice:
Public Sub Main() Dim s As String = "ab" & Chr(180) & "cd ef" & Chr(185) & "g" & Chr(195) & "hil" & Chr(179) & " mnop" Dim bb As Byte[] Dim b As Byte Dim i As Integer ' Mostra la stringa come appare con i caratteri del "ASCII esteso": Print s With bb = Byte[].FromString(s) i = .Count End With While b < i If Not IsAscii(Chr(bb[b])) Then bb.Remove(b) Dec i Endif Inc b Wend s = bb.ToString(0, bb.count) ' Mostra la stringa ora priva dei caratteri del "ASCII esteso": Print s End