accessで作成したデータベースの内容を表示させるには？ (ID:105252)

名前

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

本文 Dim mDb As Database Dim mRs As Recordset Dim strSQL As String Private Sub Form_Load() 'データベースをオープン Set mDb = _ OpenDatabase("accessのデータベース") '選択クエリーを作成 strSQL = "SELECT * FROM kokyaku " & _ "WHERE k_no = 'K0003' " ←ここがわかりません '条件に一致するレコードを取得 Set mRs = mDb.OpenRecordset(strSQL, dbOpenDynaset) '取得したデータを表示 lbl_KName.Caption = mRs.Fields("k_name") lbl_Post.Caption = mRs.Fields("post") lbl_Address.Caption = mRs.Fields("address") lbl_Tel.Caption = mRs.Fields("tel") 'オブジェクトを閉じる mRs.Close mDb.Close 'オブジェクトを解放 Set mRs = Nothing Set mDb = Nothing このようなソースです