2012-01-17 18 views
6

Come sostituire l'ultimo carattere in una stringa con VB6? Ho la sintassiCome sostituire l'ultimo carattere in una stringa con VB6?

Replace$(expression, find, replacewith[, start[, count[, compare]]]) 

ma non riesco a trovare il giusto uso di esso. Ho qualcosa di simile

iLength = Len(sBuild) 
sBuild = Replace(sBuild, "^", "ú", iLength, 1) 

Questo non funziona ma non riesco a trovare alcun esempio online.

Grazie!

risposta

4

Prova

sBuild = Left$(sBuild, iLength - 1) & "ú"

+0

Brillante. Ero così bloccato a sostituire mi sono dimenticato di questo metodo. Grazie! – JimDel

9

Un altro metodo è quello di utilizzare la parola chiave Mid():

Mid$(sBuild, Len(sBuild), 1) = "ú" 

Questo ha anche il vantaggio di non fare concatenazione di stringhe/memoria di riallocazione.

+5

Molto preferibile all'altra risposta. Ma usa la variazione $ di questo. Anche se è lo stesso (qui) questo aiuta ad evitare la cattiva abitudine di usare le funzioni Variant * *. – Bob77

+1

Ho regolato il nome della parola chiave e corretto l'offset: p – Deanna

+1

Questo è il modo corretto; molto più efficiente. Questa dovrebbe essere la risposta selezionata. –

Problemi correlati