Sie müssen noch einmal anrufen
reader = com.ExecuteReader
Nachher:
com = New MySqlCommand("SELECT id FROM accounts WHERE pword = '" & txtpword.Text & "' AND uname='" & txtuname.Text & "'", con)
Sie haben gerade überprüft, ob es Zeilen enthält, und Sie haben es nicht geändert.
