tagliare stringa con carattere

[ale500]

salve il mio problma è semplice dovrei tagliare una stringa in 2...la parte che stà a destra della virgola e quella che stà a sinistra...


ho un numero con la virgola (1,75) che dovrebbe diventare:
intero=1
virgola=75

come faccio????devo analizzarla carattere per carattere???grazie.

[ale500]

risolto da solo...un piccolo lapsus....


Ora = 14 + Left(Numero, 1)
Minuti = CSng("0," & Right(Numero, 2)) * 60:gren:

[totti240282]

cioeeeee puoi spiegarla???????

[ale500]

no niente...la parte utile è solo:

left(stringa,1) e right(stringa,2) il resto è inutile....ho fatto copia incolla dal programma e non ho cancellato il resto...

[Genius7115]

Fammi capire come funziona nel caso hai 23345,12343?

[DeBe99]

Originariamente inviato da ale500
risolto da solo...un piccolo lapsus....


Ora = 14 + Left(Numero, 1)
Minuti = CSng("0," & Right(Numero, 2)) * 60:gren:

Questo funziona solo se il numero è minore di 10. Prova cosi, ti estrai parte intera e decimale.

[CODE]
Dim nInt As Integer
Dim nDec As Double

nInt = Int(Numero)
nDec = CDbl(Numero - nInt)
[CODE]

[Genius7115]

mi sembra di capire che deve fare una conversione da decimale a ore e minuti.

[ale500]

Originariamente inviato da DeBe99
Questo funziona solo se il numero è minore di 10. Prova cosi, ti estrai parte intera e decimale.

[CODE]
Dim nInt As Integer
Dim nDec As Double

nInt = CInt(Numero)
nDec = CDbl(Numero - nInt)
[CODE]

scusa ma perchè il mio funziona solo se minore di 10?????

prendo il primo carattere con il left e prendo tutti i caratteri alla destra della posizione 2 on il right....
:gren:

[ale500]

Originariamente inviato da Genius7115
mi sembra di capire che deve fare una conversione da decimale a ore e minuti.

una mezza specie......

[totti240282]

prendo il primo carattere con il left e prendo tutti i caratteri alla destra della posizione 2 on il right....

con il left prendi il primo carattere della variabile mettiamo ciccio
quindi c

con right ciccio prendi io??????????

:sexpulp: