投稿者 魔界の仮面弁士  (社会人) 投稿日時 2018/5/24 17:31:31
> If rd.Read() Then
>   Pass = rd.GetString("Password")
>   Flag = rd.GetString("権限")
>   If Password.Text = Pass Then
>     MessageBox.Show("ユーザー名とパスワードを受け付けました。")
>     Me.Close()

この場合、Pass や Flag 変数はどこで宣言していますか?

Pass については再利用する必要が無いので、ローカル変数で十分ですが、
Flag は、OK_Click 以外の場所でも利用される可能性があるものですから、
フィールド変数なり、Shared にするなりしないといけないですよね。


> その前にPass = rd.GetString("Password")の部分で前のエラーが出ているのです。

・その時に発生している例外も「InvalidCastException」で、メッセージも完全に同一の
 「String "Password" から型 'Integer' への変換は無効です。」 なのですか?

・代入操作前に、MsgBox( "[" & rd.GetString("Password") & "]" ) を実行すると、
 画面上には何が表示されますか?

・左辺の Pass が As String であることは間違いないですか?