Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, _
      ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
        TextBox1.Text = IncU.ToString
    End Sub
 
 
    Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, _
      ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
        TextBox1.Text = IncR.ToString
    End Sub