Ultima lettera di una stringa

[pegaso22]

Ciao a tutti,
come posso estrarre l'ultima lettera di una stringa?
La stringa non ha una lunghezza fissa.
Es. "oggi piove" mi deve selezionare "e"
"oggi nevica" mi deve selezionare "a"

Fatemi sapere.
Grazie mille

[SGr33n]

Dim intLen
Dim strLastWord 'la lettera che interessa a te

intLen = len(stringa)
strLastWord = Left(stringa,intLen-1)

Bye

[optime]

userei Right invece di Left

[SGr33n]

Vero :P lol

[pegaso22]

Che strano, ho provato così:

Dim intLen
Dim strLastWord 

intLen = len(filtro)
strLastWord = Right(filtro,intLen-1)
Response.Write(strLastWord)

mi restituisce tutta la stringa senza la prima lettera.

[pegaso22]

Così funziona perfettamente:

Dim strLastWord 
strLastWord = Right(filtro,1)
Response.Write(strLastWord)

[pegaso22]

Altro quesito:
ho una stringa del genere: oggipiove-2-A

dovrei selezionare tutto ciò che c'è prima del secondo trattino da destra verso sinistra, nel esempio "oggipiove", come posso fare?

Altro esempio: ogginevica-molto-3-Q --> deve restituire "ogginevica-molto"

[pegaso22]

Risolto tutto, grazie mille

[SGr33n]

Originariamente inviato da pegaso22
Che strano, ho provato così:

Dim intLen
Dim strLastWord 

intLen = len(filtro)
strLastWord = Right(filtro,intLen-1)
Response.Write(strLastWord)

mi restituisce tutta la stringa senza la prima lettera.

Si, per right non c'era bisogno di sapere la lunghezza della stringa...

Io avevo usato il metodo precedente perchè solitamente quando uso una funzione di tal tipo, lo faccio su un tot di lettere e su stringhe di cui nn si sa la dimensione... la forza dell'abitudine :P

Bye