{"author_name":"ken3memo","provider_url":"https://hatena.blog","version":"1.0","categories":[],"url":"https://ken3code.hatenablog.jp/entry/2020/10/10/114508","title":"Access VBA \u30c7\u30fc\u30bf\u306e\u91cd\u8907\u30c1\u30a7\u30c3\u30af\u3092Dcount\u95a2\u6570\u3068\u66f4\u65b0\u524d\u51e6\u7406\u3092\u4f7f\u7528\u3057\u3066\u884c\u3046 \u304a\u3063\u3055\u3093\u306e\u30c7\u30d0\u30c3\u30b0\u52d5\u753b\u3067\u3059\u3002\u4e00\u90e8\u3067\u3082\u53c2\u8003\u3068\u306a\u308c\u3070\u3046\u308c\u3057\u3044\u3067\u3059\u3002","blog_title":"\u4e09\u6d41\u541b\u306e\u30bd\u30fc\u30b9\u30b3\u30fc\u30c9\u7f6e\u304d\u5834","provider_name":"Hatena Blog","author_url":"https://blog.hatena.ne.jp/ken3memo/","blog_url":"https://ken3code.hatenablog.jp/","published":"2020-10-10 11:45:08","type":"rich","width":"100%","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fken3code.hatenablog.jp%2Fentry%2F2020%2F10%2F10%2F114508\" title=\"Access VBA \u30c7\u30fc\u30bf\u306e\u91cd\u8907\u30c1\u30a7\u30c3\u30af\u3092Dcount\u95a2\u6570\u3068\u66f4\u65b0\u524d\u51e6\u7406\u3092\u4f7f\u7528\u3057\u3066\u884c\u3046 \u304a\u3063\u3055\u3093\u306e\u30c7\u30d0\u30c3\u30b0\u52d5\u753b\u3067\u3059\u3002\u4e00\u90e8\u3067\u3082\u53c2\u8003\u3068\u306a\u308c\u3070\u3046\u308c\u3057\u3044\u3067\u3059\u3002 - \u4e09\u6d41\u541b\u306e\u30bd\u30fc\u30b9\u30b3\u30fc\u30c9\u7f6e\u304d\u5834\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","image_url":"https://cdn-ak.f.st-hatena.com/images/fotolife/k/ken3memo/20201010/20201010114206.jpg","height":"190","description":"https://www.youtube.com/watch?v=Irr_9wx6CAY \u6a19\u6e96\u30e2\u30b8\u30e5\u30fc\u30eb\u306bDCount\u3092\u5229\u7528\u3057\u305f\u30c1\u30a7\u30c3\u30af\u95a2\u6570\u3092\u8ffd\u52a0\u3059\u308b Option Compare Database Option Explicit '0.\u5546\u54c1\u30b3\u30fc\u30c9\u3092\u53d7\u3051\u53d6\u308a '1.\u30de\u30b9\u30bf\u30fc\u306b\u3001\u53d7\u3051\u53d6\u3063\u305f\u30b3\u30fc\u30c9\u304c\u3042\u308b\u304b\u30c1\u30a7\u30c3\u30af '2.\u660e\u7d30\u3001\u5c65\u6b74\u306b\u30c0\u30d6\u308a\u304c\u3042\u308b\u304b\u3001\u30c1\u30a7\u30c3\u30af\u3059\u308b '\u5546\u54c1\u30b3\u30fc\u30c9\u3092\u53d7\u3051\u53d6\u308a\u3092\u30c1\u30a7\u30c3\u30af\u7d50\u679c\u3092\u30a8\u30e9\u30fc\u306a\u3089True\u3067\u8fd4\u3059\u95a2\u6570 Public Function chk\u5546\u54c1\u30b3\u30fc\u30c9(str\u5546\u54c1\u30b3\u30fc\u30c9 As String) As Boolean Dim nCNT As Integer '1.\u30de\u30b9\u30bf\u30fc\u306b\u3001\u53d7\u3051\u2026"}