文字条件に合うレコードを抽出する|Access SQL

SELECT FROM WHERE : 文字列で抽出する場合、'(単引用符)で囲みます

Access VBAでSQLを実行するコードを掲載しています。サンプルソフトもダウンロードできます。

例. SELECT 名前 FROM 学生名簿 WHERE 苗字='大木'
苗字が「大木」の名前をレコードセットに取り出します。
文字列の場合、'(単引用符)で囲みます。

スポンサーリンク




BackHomeへ BackSQL Tipsへ

実行サンプルソフト

[実行時の画面]
型式を入力し「抽出」ボタンをクリックすると、商品カタログから見つかれば「商品名」「価格」を表示します。
見つからなければ、メッセージを表示します。
商品検索結果

[商品カタログ テーブル]
商品ID 商品名 型式 価格
10 液晶TV 20型 ETV-20D \78,000
11 液晶TV 26型 ETV-26D \98,000
13 液晶TV 32型 ETV-32D \2,600,000
16 液晶TV 37型 ETV-37D \3,500,000
商品カタログテーブル

スポンサーリンク



SQLを実行するAccess VBA

Option Compare Database

Private Sub コマンド8_Click()
    Dim SQL As String
    Dim rs As Recordset
    If IsNull(Me!テキスト1) Then
        MsgBox "抽出する「型式」を入力してください"
        Exit Sub
    End If
    Me!テキスト2 = Null
    SQL = "SELECT 商品名,価格 FROM 商品カタログ WHERE 型式= '" & Me!テキスト1 & "'"
    Set rs = CurrentDb.OpenRecordset(SQL)
    If Not rs.EOF Then
        Me!テキスト2 = rs![商品名]
        Me!テキスト3 = rs![価格]
    Else
        MsgBox "入力された型式の商品は見つかりません。"
    End If
    Set rs = Nothing
End Sub

サンプルソフトのダウンロード

スポンサーリンク




BackHomeへ BackSQL Tipsへ

Copyright(C) FeedSoft