Buonasera ragazzi,
ho un problema con il salvataggio. In particolare quando salvo o carico un dato, visualizzo solo la parte intera e la decimale no. Ecco cosa ho scritto:


codice:
Private Sub Salva_Click()  rec = Text6.Text Open (App.Path & "/time.txt") For Output As #1 Print #1, rec Close #1  End Sub
codice:
Private Sub Form_Load() Label10.Caption = "Oggi è il " & data & " "  Open (App.Path & "/time.txt") For Input As #1 Input #1, rec Text5.Text = rec Close #1  End Sub
Come devo modificare?

Grazie in anticipo!