Private Sub TxtSsendvalue1_Validated(ByVal sender As Object, ByVal e As _
  System.EventArgs) Handles TxtSsendvalue1.Validated
        Dim test As String
 
 
        If Me.CBSset1.Text = "int" And IsNumeric(Me.TxtSsendvalue1.Text) Then
            Me.TxtSsendvalue1.Text = Me.TxtSsendvalue1.Text.Replace(".", ",")
            Me.TxtSsendvalue1.Text = CInt(Me.TxtSsendvalue1.Text)
        End If

hallo ich lerne gerade visual donet und m?chte gern an den Foren teilnehmen