No.4ベストアンサー
- 回答日時:
再びmaruru01です。
文字を入力するごとにチェックするのであれば、やはり変更時イベントだと思います。(10文字以内の制限とする)
Private Sub テキストボックス_Change()
Dim temp As String
temp = Me!テキストボックス.Text
If Len(temp) > 10 Then
MsgBox "文字数オーバー"
With Me!テキストボックス
.Text = Left(temp, 10)
.SelStart = 0
.SelLength = Len(.Text)
End With
End If
End Sub
普通にLen関数を使えば、全角半角関係なく1文字と数えます。
では。
No.2
- 回答日時:
こんにちは。
maruru01です。VBでは入力文字数を制限する、「MaxLength」というプロパティがありますが、確かAccessにはそれに該当するプロパティは無かったような気がします。
したがってテキストボックスのキー入力時イベント(KeyPressイベント)に以下のようにするとかですね。(例では10文字以内に制限)
Private Sub txt高さ_KeyPress(KeyAscii As Integer)
If Len(テキストボックス.Text) >= 10 Then
MsgBox "文字数オーバー"
KeyAscii = 0
End If
End Sub
この場合11文字目をキー入力することが出来なくなります(入力が取り消される)。
ただし、コピペした場合はその限りではありません。
その場合は、変更時イベント(Changeイベント)で文字列長をチェックして、前から10文字を越える分をカットして表示するとかですかね。
では。
この回答への補足
全角半角混在していてもチェックが出来るようにしたいのです。
更新前処理イベントでは、文字チェックだけを行い
参考ホームページ以外で文字の桁数の制限を行いたいのですが
何か方法はありませんか。
参考ホームページ http://www.geocities.co.jp/Milkyway-Kaigan/3714/ …
http://www.users.gr.jp/ml/archive/access/6377.asp
No.1
- 回答日時:
こんにちは。
以前、ACCESSやExcelで業務アプリを
作っていた者です。
入力文字数は、プロパティのlengthでしたか、
何かで設定可能だったと思います。
関係ないですが、入力チェックは、同一イベントで
全て行った方がよろしいかと思います。
[仕様であれば、仕方がありませんが。。。]
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) capeofdragonと申します。 Access2016を使っております。 あるフォームがあり、テ 2 2022/09/09 13:18
- Access(アクセス) Access の SetFocus について教えてください 5 2022/08/04 07:32
- au(KDDI) iPhoneSEを使用しています。ショートメールを使用していて入力中に70と表示されるのは70文字ま 1 2022/11/28 23:36
- Visual Basic(VBA) Vba テキストボックスの文字列をボタンで入力するとテキストボックスの端の文字列が更新されない 2 2022/05/21 23:32
- その他(ソフトウェア) ソースネクストアプリをインストールし、製品登録で半角英数字が入力できない 5 2022/07/03 22:44
- JavaScript Javascriptが機能せず原因が分からないので教えて頂きたいです 3 2023/06/04 14:50
- Excel(エクセル) エクセル関数の変わった使い方 3 2022/05/13 17:12
- Excel(エクセル) EXCELでリターンキーが押されたらそのセルに特定の文字を表示したいのですが。 2 2022/08/07 12:58
- Excel(エクセル) エクセルでシート保護のかかり方の違いとセルの非保護の設定 3 2022/08/09 10:02
- Visual Basic(VBA) vbaサブフォルダーをワイルドカードで取得したい 2 2022/11/15 08:04
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
アクセスのフォームに入力する文字に制限をかけたい
Access(アクセス)
-
ACCESSの入力文字数の制限について
Access(アクセス)
-
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
-
4
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
5
Access VBAで行ラベルが定義されていないというエラーが出ます
Access(アクセス)
-
6
ACCESS 入力文字数制限
Access(アクセス)
-
7
Access2000 サブフォームのRecordSet取得法
Access(アクセス)
-
8
Accessの桁区切りについて教えてください。
Access(アクセス)
-
9
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
10
Access サブフォームでの選択行の取得
その他(データベース)
-
11
Accessのフォーマット時イベント
その他(データベース)
-
12
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
13
ACCESSフォーム入力後の確定
Access(アクセス)
-
14
どこにもフォーカスを当てたくない
Access(アクセス)
-
15
テキストボックスのvalueとtextの違い
Visual Basic(VBA)
-
16
フォームの高さを数値で指定したいのですが
Excel(エクセル)
-
17
Access レポート印刷するときに1ページに収める方法
Access(アクセス)
-
18
Accessでフィールド名を変数(文字列)で・・・
Access(アクセス)
-
19
アクセスでレコードの内容が変更されたかどうかを調べるには
Access(アクセス)
-
20
アクセスでテキストボックスの値が空白だったら
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
「ドゥ」の簡単なローマ字入力方法
-
Google form グーグルフォーム...
-
PDF 入力途中で改行したい
-
エクセルでセル未入力時の初期...
-
タッチパネルディスプレイをデ...
-
googleカレンダーの予定を入力...
-
「ディ」はどう入力すればいい...
-
Office Word [ここに入力] が...
-
小さい「う」
-
MACで化学式を入力する方法を教...
-
パリティチェッカ 74180について
-
明和電機のガチャコンを持って...
-
ACCESS2003。数値型のフィール...
-
EXCEL VBA でインプットボック...
-
マクロン(¯)とキャメロン(ˇ)に...
-
ハイパーリンクが途切れる
-
NANDのみで入力したいです
-
ブラウザ Firefox でパソコンか...
-
ブラウザ Firefox クローム ス...
-
画像文字認証の失敗
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Google form グーグルフォーム...
-
「ドゥ」の簡単なローマ字入力方法
-
googleカレンダーの予定を入力...
-
エクセルでセル未入力時の初期...
-
PDF 入力途中で改行したい
-
Office Word [ここに入力] が...
-
パソコンで単純作業の入力について
-
エクセルでセルに「氏名を入力...
-
「ディ」はどう入力すればいい...
-
濁点のつく字が入力出来ないと...
-
Excelのセルを飛ばして入力する
-
小さい「う」
-
り を数字で表す
-
ダウンロードしたフォーマット...
-
EXCEL VBA でインプットボック...
-
MACで化学式を入力する方法を教...
-
Googleスプレッドシートで時間...
-
文字入力すると2重になってしまう
-
Forms のアンケートで、地図を...
-
文字を入力すると左下に表示さ...
おすすめ情報