Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


26 / 2253 ツリー ←次へ | 前へ→

【13176】文字列は半角英数字かの確認 YamadaSa 17/6/27(火) 16:55 質問[未読]

【13189】Re:文字列は半角英数字かの確認 YamadaSa 17/7/15(土) 18:05 質問[未読]
【13190】Re:文字列は半角英数字かの確認 hatena 17/7/16(日) 14:15 回答[未読]

【13189】Re:文字列は半角英数字かの確認
質問  YamadaSa  - 17/7/15(土) 18:05 -

引用なし
パスワード
   ▼hatena さん:
>hatenachips.blog34.fc2.com/blog-entry-399.html
>
>リンク先の説明を読みましたか。
>
>読んでその通りにすればできるはずです。

hatenachips.blog34.fc2.com/blog-entry-399.htmlを
読みましたが、やはりわかりませんでした。
大変申し訳ありませんが、再度ご指導をいただけませんか?

【13190】Re:文字列は半角英数字かの確認
回答  hatena  - 17/7/16(日) 14:15 -

引用なし
パスワード
   hatenachips.blog34.fc2.com/blog-entry-399.html

のそのままのコピペです。

まず、標準モジュールを新規作成します。名前は、mdlBinaryCompare とします。そこに、下記のコードをコピーして貼り付けます。


Option Compare Binary 'バイナリモードで文字列比較
Option Explicit

Public Function LikeB(s1, s2) As Boolean

  If IsNull(s1 + s2) Then Exit Function
  LikeB = s1 Like s2

End Function

これを保存します。

以上です。

26 / 2253 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1013881
(SS)C-BOARD v3.8 is Free