Buona sera ragazzi,
ho un problema con l'inputbox. In pratica se scrivo in questo codice:

codice:
Private Sub cmdInserisci_Click()
On Error Resume Next
Dim newval As Double
newval = InputBox("Inserisci nuovo valore", "Inserimento dati")
If newval <> "" Then
Text5.Text = newval
End If
Allora se inserisco il nuovo valore, lui correttamente mi copia in Text5 il valore da me inserito; ma se non inserisco niente(o clicco su Annulla), il programma inserisce nella Text5 il valore 0. Non voglio questo...voglio che rimane il valore presente della Text5, cioè che non modifichi niente. Come devo risolvere?


Grazie a tutti in anticipo!