Le portail francophone de la géomatique

Bonjour,

Mon problème est assez simple j'imagine mais là je bloque complètement.
Je cherche à retourner la valeur complète de données enregistrées au format flottant.

Ex : J'ai dans ma base la valeur 117,69812011719 hors si je fais un "fetch" dessus il me retourne 117,698

Règle du jeux : je ne peux pas changer cette colonne en virgule fixe.

Voici le bout de code que j'utilise ( c'est de l'OLE depuis VB) :

      For i = 1 To m_row_count_sel
        o_Wait.Value = i - 1
        Mi.Do ("Fetch Rec " & i & " from " & sSelName)
        'Dim iValue As Double
        'iValue = Round(Val(Mi.Eval(sSelName & "." & s_col_lib)), 11)        
        'MsgBox (cstr(iValue))
        m_row_lib(i - 1) = Val(Mi.Eval(sSelName & "." & s_col_lib))
      Next

J'ai essayé de formater depuis vb mais le problème est en amont :
Mi.Eval(sSelName & "." & s_col_lib) retourne la valeur arrondie.

Si quelqu'un à une idée.

Merci d'avance