閉じる

レコードの件数を数える　（Dcount関数）


　’Dcount関数は　テーブルやクエリーに含まれる項目の件数を返します

　'Dcount（"項目名",[テーブル名／クエリー名],[条件])

　'全件のときは、項目名を＊、条件なし　Dcount("*",[テーブル名／クエリー名])



　'商品テーブル内の　商品コードが　１００　のレコード件数を数える

　Dim lngKENNSU as long

  Dim ckCD as long

  ckCD = 100



  lngKENSU = Dcount("*","商品テーブル","商品コード =" & ckCD)



  '商品コードが文字型のとき

　Dim ckCD as string

  ckCD = "100"





  lngKENSU = Dcount("*","商品テーブル","商品コード =’" & ckCD & "'")