Public Sub LeseDaten()
 
 
        Dim myCommand As MySqlCommand = Form1.MySQLVerbindung.CreateCommand()
        myCommand.Connection = Form1.MySQLVerbindung
        myCommand.CommandText = ("Select count(*) from messung ")
        Dim Test As String
        Test = myCommand.ExecuteNonQuery
        Form1.MySQLVerbindung.Close()
        MsgBox(Test)
    End Sub