Grazie mille! funziona alla grande! (all'inizio non mi aveva funzionato, il problema era il TextBox2.Text = NumericUpDown1.Value, che mi incuriosiva perchè proprio non ricordavo a che serviva...evidentemente ho dimenticato di cancellarlo durante altre prove...)Originariamente inviato da ShaleN
Salve a tutti.
Prova così:
codice:Public Class Form1 Dim OriginalValue As Integer = 0 'o il valore iniziale della NumericUpDown. Private Sub NumericUpDown2_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NumericUpDown2.ValueChanged TextBox2.Text = NumericUpDown1.Value If NumericUpDown2.Value = OriginalValue + 1 Then TextBox2.Text += costo Else If NumericUpDown2.Value = OriginalValue - 1 Then TextBox2.Text -= 1000 End If End If OriginalValue = NumericUpDown2.Value End Sub End Class![]()
![]()