入力したTextとAccessのDBとの照合 (ID:126353)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 KGさんレス有り難うございます。 SQLとFindメソッドを使って試してみたのですが、うまくいきませんでした。 mySQL = "select IDNo from ID" rs.Source = mySQL rs.ActiveConnection = DataEnvironment.Connection1 rs.CursorType = adOpenStatic rs.Open rs.Find "IDNo = '" & txtID.Text & "'" If rs.EOF Then MSG = MsgBox("IDが正しくありません", vbExclamation) Else frmMSTS0010.Show Unload Me End If 何分ずぶの素人でして、宜しく御力沿いの程お願い仕ります。