| スポンサードリンク |
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
|
|
ダウンロード