[VBA] eliminare caratteri ASCII da ListBox

Al_adin

Nuovo Utente
13 Feb 2012
5
0
0
Help Me please !

Premetto che sono un pivello della progarammazione.

Con il VBA ho realizzato una macro in WORD. Ho usato un form su cui ho disposto diversi controlli.
In particolare ho inserito una ListBox che carica automaticamente le righe di un file non appena si seleziona un OptionButton. Per aprire il file e leggere le righe ho usato questo codice:

Private Sub OB1CL2_Click()
Dim Righe As String
Dim i As Integer ' indice
Open "C:\1partec.txt" For Input As #1
Do ' ciclo do loop
i = i + 1
Input #1, Righe
ListBox1.AddItem Righe
Loop Until EOF(1) = True
Close #1
End Sub

Tuttavia nella 1 riga della ListBox mi compaiono dei caratteri che non sono presenti nel file di testo.
La riga originale nel file di testo è:
L’antenna non capta il segnale
quando la ListBox carica le righe del file automaticamente vengono aggiunti altri caratteri e la stringa risultante si presenta così:

ÿþL|antenna non capta il segnale

i primi due sono i caratteri ASCII 222 e 255 poi c’è la L e al posto dell’apostrofo compare il carattere ascii 195, che qui ho rappresentato in modo diverso, il resto corrisponde. Per eliminare i quattro caratteri in più ho modificato l’istruzione

ListBox1.AddItem Righe

Con

ListBox1.AddItem Mid$(Righe, 4)

Ma questa mi taglia le prime quattro lettere di tutte le righe della ListBox.
Cosa devo fare per fare in modo che solo la prima riga della ListBox venga modificata da cosi

ÿþL|antico borgo

a così

L’antico borgo

Grazie.
 

Vins

Moderatore
Membro dello Staff
MOD
28 Lug 2009
238
19
0
Ciao,

i caratteri dipendono dalla codifica Unicode/UTF-8.

Per eliminarli prova ad aprire il file con un editor di testo e salvarlo in formato ansi.
 
Discussioni simili
Autore Titolo Forum Risposte Data
G VBA OpenForm con WhereCondition + LIKE su campi differenti MS Access 5
F Modificare report di etichette di access con vba MS Access 0
Spenalzo Creare tabelle multiple con Access via VBA MS Access 2
GraceHawk ACCESS e VBA: scorrere le righe e le colonne di una tabella? MS Access 3
alankanz [VBA] Valori Array in una cella Visual Basic 1
F [MS Access] VBA non funziona più MS Access 2
T [VBA] Word: numerazione pagine su più documenti Windows e Software 2
O VBA Bottone di ricerca MS Access 0
alankanz [VBA] Ricerca testo formato specifico Visual Basic 0
A Access, creare nuova tabella in DB esterno con VBA Visual Basic 0
O Codice vba per la ricerca di record MS Access 0
Z [VBA] Debug ciclo for Visual Basic 0
novello88 [VBA] Risultato formula Excel Visual Basic 1
novello88 creare e distruggere collegamenti a tabelle con VBA MS Access 0
T aprire pdf con vba excel Programmazione 0
G Access in VBA - Come si fa a modificare testo nel'intestazione di file Word MS Access 0
L VBA Access Numero si azzera con dmax Database 0
G controllii inserimento dai vba Database 0
S vba - excel 2003 - controllo calendario Visual Basic 0
S Excel: formattazione celle condizionata con vba Visual Basic 0
M [VBA/EXCEL]Confronto colonne e stampa riga Visual Basic 0
K Come inseriesco una query in Vba Database 0
C XLS – VBA Creazione database da questionari. HELP urgente, pls Database 0
G VBA e ordinare celle relativamente in Excel 2007 Windows e Software 0
S trsformare userform da VBA a VB classico Programmazione 0
S comandare via VBA Programmazione 0
S VBA per Excel Database 1
M Microsoft Excel e VBA Programmazione 0
M StarOffice (OpenOfice) ---> VBA : 0-1 Windows e Software 0
M eliminare padding logo sito HTML e CSS 2
A eliminare caratteri speciali mettendo uno spazio PHP 0
A eliminare caratteri diacritici con codice ascii PHP 4
MarcoGrazia Eliminare in automatico i caratteri spuri all'inizio e alla fine di una stringa Snippet PHP 0
L Eliminare estensione .html HTML e CSS 9
L [RISOLTO] Eliminare una discussione creata PHP 3
S Eliminare spazio iniziale PHP 2
S [PHP] Eliminare doppioni array e rinumerare le posizioni PHP 2
maxnegri Eliminare url index.php con variabili e reindirizzare alla home del sito PHP 7
D [ASP] Eliminare gli zeri che nn servono Classic ASP 1
K Come eliminare attributi regex per validazione con javascript Javascript 0
maxnegri [PHP] Eliminare risultati duplicati da ciclo foreach ottenuti da una select php mysqli PHP 18
P [HTML] Eliminare doppio menu in wordpress WordPress 2
P [WordPress] Eliminare scritta Categories da post WordPress 4
C [PHP] eliminare elemento da un array multidimensionale PHP 9
L Mi trovo nell'impossibilità di eliminare un record nella tabella Database 1
A [WordPress] Eliminare riga codice HTML WordPress 6
loois come eliminare una discussione fata in questo forum ? Discussioni Varie 1
trattorino [PHP] Eliminare piu frasi PHP 1
C [PHP] RISOLTO - Eliminare elementi duplicati da array multidimensionale PHP 1
L [HTML] versione mobile eliminare stile menu da nav HTML e CSS 0

Discussioni simili