VB.netでのログイン画面実装

Question

ログイン画面を実装しております。名前、パスワードが保存されているテーブル(情報テーブル)はすでに用意されています。

コンボボックスから選択した名前でその名前と同行のパスワードを入力してもMsgBox記載の通り、(名前またはパスワードが間違っています。再入力してください。)と表示されます。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles kakuninn.Click

    If txtPassword.Text = "" Then
        MsgBox("パスワードを入力してください。")
        Return
    End If

    If ComboBox1.Text = "" Then
        MsgBox("名前を入力してください。")
        Return
    End If

    Dim con As New OleDbConnection()
    Dim cmd As New OleDbCommand()
    Dim da As New OleDbDataAdapter()
    Dim ds As New DataSet()
    Dim table As New DataTable

    Dim f As New Form0100()
    Try
        ' DB接続文字列の設定
        con.ConnectionString = My.Settings.PassCon
        ' コネクションの設定
        cmd.Connection = con

        ' DB接続を開く
        con.Open()

        ' SQL文の設定
        cmd.CommandText = "SELECT 名前,パスワード"
        cmd.CommandText &= " FROM 情報テーブル"
        cmd.CommandText &= "WHERE 名前 = '" & ComboBox1.Text & "' AND パスワード = '" & txtPassword.Text & "'"

        ' データを取得する
        
        da.SelectCommand = cmd
        da.Fill(ds, "情報テーブル")


    Catch ex As Exception

        'MsgBox("名前またはパスワードが間違っています。" & Environment.NewLine & "再入力してください。")

    Finally
        If table.Rows.Count.ToString > 0 Then
            f.Show()
        Else
            MsgBox("名前またはパスワードが間違っています。" & Environment.NewLine & "再入力してください。")
        End If
        ' DB接続を閉じる
        If Not con Is Nothing Then
            con.Close()


        End If



    End Try

End sub

Comments

[gentaro]

質問文に「質問したい内容」すら書かれておらず、あなたがどこまで何を調査してどこに疑問を持っているのかも書かれていないため、質問として論外な状態です。
ここはデバッグをタダで外注するための場所じゃないことを弁え、ガイドライン読んで質問文を編集してください。
https://teratail.com/help/question-tips
https://teratail.com/help/avoid-asking

[退会済みユーザー]

コードは ``` で ``` で囲ってください(``` はバッククオート 3 つ)。インデントされて見やすくなるので。インデントされてないコードは質問者さん自身も読む気がしないのでは？ 赤の他人の閲覧者、回答者はなおさらです。読んでもらえないと話が始まらないのですから読んでもらえる努力をしましょう。

Answer 1

エラーメッセージの出力が2か所ありますが、上はコメントアウトされているので処理されているのは下の方ですね。
DataTableの行数チェックでFalseになっています（これはToStringする必要はないと思うんですが）。
検証するインスタンスはtableで合っていますか？

Comments

[maaaakio]

回答ありがとうございます。
そうですね。検証するのはインスタンスです。

[Zuishin]

> 検証するのはインスタンスです。

意味不明。意味がわからなかったら聞き返したらどうでしょうか。
それ以前に「インスタンス」以外全部無視って。
何かわかってたらかっこよさそうな言葉が出たから反応してみただけみたいに見えますよ。そんなんじゃ。

[maaaakio]

すみません。知識不足で戸惑った回答をしてしまいました。
インスタンス(実体化)するのはtableです。