VBA restituzione di un valore percentuale a 4 decimali

Question

Ciao a tutti,

sono sempre alle prese con il mio dbase!  In particolare voglio che mi venga restituito il valore percentuale, calcolato in una form, in una finestra msg come da figura 1.

Ho impostato il campo calcolato con 4 decimali e a video tutto si vede bene, ma quando inserisco il campo nella finestra msg, VBA non tiene conto della formattazione a 4 decimali.

Come posso modificare il codice in modo tale che mi venga restituito un valore a 4 decimali anche nella finestra messaggio?

Posto anche il codice della finestra msg.

grazie

Luca

Answer 1

Ciao Sandro

Ho provato ma non funziona. Sicuramente sbaglio in qualcosa. 

Grazie

Luca

Answer 2

ciao Luca,

prova così :

Format$(Me.tuaTextBox, "#,##0.0000%")

Ciao, Sandro.

Answer 3

Ho risolto:

'------------------------------------------------------------

' Percentuale perizie %

'------------------------------------------------------------

Private Sub GGInizioLavori_AfterUpdate()

On Error GoTo Form_Open_Err

    If PercPerizie > 0 Then

        Beep

        MsgBox "Attenzione! La percentuale di incremento lavori è pari al " & Round([PercPerizie], 4) & "%", vbCritical, "PERCENTUALE PERIZIE"

    End If

Form_Open_Exit:

Exit Sub

Form_Open_Err:

    MsgBox Error$

    Resume Form_Open_Exit

End Sub

grazie