Deberías tener que llamar de nuevo
reader = com.ExecuteReader
Después:
com = New MySqlCommand("SELECT id FROM accounts WHERE pword = '" & txtpword.Text & "' AND uname='" & txtuname.Text & "'", con)
Acabas de comprobar que tiene filas antes y no lo has cambiado.