dividere valori non interi

[Certe Notti]

salve a tutti,

io ho il seguente cruccio...

if (cint(Conta_sezione1) > 0) then
Percentuale_sezione1 = round((Conta_sezione1/Conteggio_totale)*100,2)
Larghezza_sezione1 = ????
end if

infatti io parto dal presupposto che 1% = 3px di larghezza e che quindi 0,33 è = ad 1px

larghezza sezione quindi dovrebbe essere in linea teorica la percentuale della sezione1 divisa per 0,33 ma questo in termini di codice come fo a dirglielo?

Grazie

[Certe Notti]

dunque anche senza efettuare la divisione per 0,33 io potrei fare così:

cint(percentuale_sezione1)

e recupero il valore a sinistra della virgola poichè cint se non ricrdo male recupaera la parte intera del valore... se non ricordo male!
dopo di che moltiplico quel valore x 3

sucessivamente devo recuperare il valore a destra della virgola che sarà un certo 0,xx e fare un controlo del tipo

If (valore = 0) the end
if valore <= 33 then e aggiungo 1px
if (valore => 33) and (valore <= 66)then e aggiungo 2px
if valore <= 99 then e aggiungo 1px

solo che non saprei come recuperare il valore a destra della virgola...

grazie

[Certe Notti]

suggerimenti?