Salve, sono nuovo di questo forum perche dopo tanti anni ho deciso di passare da access a Mysql.

sto riuscendo a fare tutto abbastanza bene ma una cosa non la capisco e cioè perche la funzione di cui sotto non mi funziana piu?
Grazie in anticipo

codice HTML:
Function VisualizzaPrezzo(VisualizzaPrezzo_StringaPrezzo)
        VisualizzaPrezzo_StringaPrezzo = Int(VisualizzaPrezzo_StringaPrezzo)
        Do While Length(VisualizzaPrezzo_StringaPrezzo) < 3
            VisualizzaPrezzo_StringaPrezzo = "0" & VisualizzaPrezzo_StringaPrezzo
        Loop
        Dim VisualizzaPrezzo_StringaDecimale, VisualizzaPrezzo_StringaIntero
        VisualizzaPrezzo_StringaDecimale = Mid(VisualizzaPrezzo_StringaPrezzo, Length(VisualizzaPrezzo_StringaPrezzo) - 1, 2)
        VisualizzaPrezzo_StringaIntero = Mid(VisualizzaPrezzo_StringaPrezzo, 1, Length(VisualizzaPrezzo_StringaPrezzo) - 2)
        VisualizzaPrezzo = VisualizzaPrezzo_StringaIntero & "," & VisualizzaPrezzo_StringaDecimale
    End Function