SELECT * FROM テーブル名 WHERE 条件式
条件を設定するには、WHEREを使います。
条件式には、比較演算子(=、>、<=、>、>=、<>、Like)、論理演算子(And,Or,Xor,Not)などが使えます。
サンプルソフト
[実行時の画面]
商品IDを入力すると、対応する商品名と原価を抽出し表示します。
[見つからない場合の画面]
入力された商品IDが見つからない場合、「見つかりませんでした。」のメッセージを表示します。
[商品マスター テーブル]
商品ID 商品名 原価
10 液晶TV\320,000
11 デジタルカメラ \56,000
13 プラズマテレビ \280,000
16 DVDレコーダー \80,000
[コード]
Option Compare Database
Private Sub コマンド8_Click()
Dim SQL As String
Dim rs As Recordset
If IsNull(Me!テキスト1) Then
MsgBox "「抽出する商品ID」を入力してください"
Exit Sub
End If
SQL = "SELECT 商品名,原価 FROM 商品マスター WHERE 商品ID=" & 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
サンプルソフトのダウンロード