Public Class uscntr_ConnectTel


    Private Sub FlatButton1_Click(sender As Object, e As EventArgs) Handles FlatButton1.Click
        If TextBox1.TextLength > 0 And TextBox2.TextLength > 0 Then

            Dim pascom As New cPascom
            pascom.Username = TextBox1.Text
            pascom.Arbeitsplatz = TextBox2.Text
            pascom.Anmelden()

        Else
        End If

    End Sub
End Class