忍者ブログ
ADMINNEW ENTRY
C A L E N D A R
03 2025/04 05
S M T W T F S
1 2 3 4 5
6 7 8 9 10 11 12
13 14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30

専門学生時代にACCESSを学び、現在会社で使用しているシステムがACCESSで作られているので再度勉強中です。(学校ではVBAを全然習わなかったので) これからACCESS VBAを勉強する方一緒に学んでいきましょう
No.52 No.51 No.50 No.49 No.48 No.47 No.46 No.45 No.44 No.43 No.42
2025-04-24(Thu)
[PR]
×

[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。



.

2009-07-29(Wed)
DCount関数

DCount関数を使用することでテーブルやクエリのレコード件数を取得することができます。

6c8ef1ca.jpeg






Dcount関数

Sub T_count()

    Dim cou As Integer
    
    '会員数の取得
    cou = DCount("会員No", "T_会員")
   
    MsgBox ("会員数は" & cou & "名です。")
   
End Sub


上の例ではT_会員テーブルのレコード数を変数couに入れ、
メッセージボックスで取得した値を表示させています。

 

PR


.


・C O M M E N T
  • この記事へのコメント投稿フォームです。


  • Name:
    Title:
    Mail:
    Url:
    Color:
    Decoration:
    Vodafone絵文字 i-mode絵文字 Ezweb絵文字
    Message:
    Pass:
    ※編集時に必要です。


    TRACKBACK
    • この記事のURLとトラックバックURLです。
    • 必要に応じてご使用くださいませ。
    この記事のURL▽
    この記事のトラックバックURL▽
    No.52 No.51 No.50 No.49 No.48 No.47 No.46 No.45 No.44 No.43 No.42

    Powered by NinjaBlog. Template by うさねこ.
    忍者ブログ[PR]