[VB6] Funzioni Stringa

[Fado84]

salve a tutti, ho un piccolissimo problema..
vado al dunque..
ho più stringhe fatte in questo modo:

><?!54 !"£$FSAF
SD"£!"2 £$FSA
"EAD£$312 "£"D

di queste stringhe volevo tenere solo i numeri quindi come dall'esempio sopra:

><?!54 !"£$FSAF >>> 54
SD"£!"2 £$FSA >>> 5
"EAD£$312 "£"D >>> 312

grazie mille per l'aiuto
ciao

[xegallo]

stemp = ""
for i = 1 to len(stringa)
   if isnumeric(mid$(stringa,i,1)) then
      stemp = stemp & mid$(stringa,i,1)
   end if
next i

dentro stemp hai tutti i numeri che ci sono nella stringa

[Fado84]

grazie.. era una banalità mi vergogno di me stesso.. sarà perchè era l'1.
ciao e grazie

[Fado84]

scusa.. non capisco una cosa.. cosa cambia da
mid$ a mid ??
grazie

[Fado84]

aiuto, che casino per una cavolata..
devo avere una condizione di questo tipo:

If (IsNumeric(Mid$(stringa, i, 1)) Or Mid$(stringa, i, 1) = ".") And (Mid$(stringa, i + 1, 1) <> """ ) Then

praticamente voglio che mi scarti quei numeri a cui segue un apice...
ciao!

[Fado84]

ho risolto con Chr(34)

ciao

[Toeke]

Originariamente inviato da Fado84
scusa.. non capisco una cosa.. cosa cambia da
mid$ a mid ??
grazie

L'uso del $ e' un modo per definire una variabile
$ = String
% = Integer
& = Long
Etc.

Una variabile dichiarata cosi:

dim i as integer

o

dim i%

e' la stessa cosa.
Nel caso delle funzioni e' + o meno la stessa cosa.


Toeke

[Fado84]

altro problemuccio..
se ho una stringa di 1000 caratteri come faccio a cancellare dal carattere 0 al 100 ??
e dal 253 al 278 e dal 500 al 999??

Grazie mille!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
saluti