[VB6] Format che non funziona su Windows 98

[maliba]

Ho creato un programma per calcolare preventivi con vb 6.0
Funziona alla perfezione quando lo installo su sistemi operativi win XP. I probblemi nascono quando lo installo su sistemi diversi che mi da run-time error 13
Ho installato l'IDE di vb su un pc con win 98 e nel fare il debug mi blocca sulla funzione Format:
Text5 = Format (Text5, "€ #,##.#0")

Ho provato ad aprire un nuovo progetto inserendo un textbox ed un pulsante per verificare.
in command1 inserisco Text1 = Format(Text1, "€ #,##.#0") e funziona regolarmente...
chi mi può aiutare???

Grazie in anticipo.

[LMondi]

Prova in questi due modi:

sommatot = Format(somma, "#,##0.00 €")
sommatot = "€  " & Format(somma, "#,##0.00")

[oregon]

Ma quali sono le impostazioni internazionali impostate nel sistema Win98 ?

E poi la prova che hai fatto non vuol dire molto ... non hai detto cosa conteneva "prima" della format Text5 e cosa conteneva Text1 ...

[maliba]

Sono andato a vedere nelle references del progetto e ho notato che mi da
MISSING: Microsoft ActiveX Data Object 2.8 library

se vado a sostituire la 2.8 con la 2.0 funziona regolarmente solo che i numeri formattati con € me li riconosce come stringhe di testo e ovviamente va in errore.
Ho quindi risolto sostituendo (Text5, "€ #,##.#0") con (Text5, "#,##.#0").

mi sembra di intuire che quel:
MISSING: Microsoft ActiveX Data Object 2.8 library
stia ad indicare che manca una libreria.
E se volessi includerla e ridistribuirla con il mio progetto dove posso trovarla???

Comunque grazie per le risposte...

[oregon]

MDAC 2.8 dal sito Microsoft