Code:
Private Sub nudPoints_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles nudPoints.ValueChanged Dim points As Integer = Int32.Parse(txtPoint.Text) + nudPoints.Value + nudMiscPoints.Value txtPointsTotal.Text = points End Sub
Leave a comment: