OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
解決
済み

制限の仕方について

  • すぐに回答を!
  • 質問No.220684
  • 閲覧数47
  • ありがとう数1
  • 気になる数0
  • 回答数3
  • コメント数0

お礼率 29% (17/57)

電卓みたいなつくりで、コマンドボタン(数字の0~9と'-’や小数点など、よってコマンドボタンの数は12個ぐらいです。コマンドボタンを一つ一つの数字に対応させている。)を押したらラベルやテキストに数字を表示するもの作っています。わかりやすく言うと(?)、電卓の計算機能を取り除いたやつです。そこで、数字入力の際にラベルやテキストに-100~100までしか表示できないようにするには、どのように記述すればいいのですか?教えてください。
通報する
  • 回答数3
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.3
レベル13

ベストアンサー率 26% (267/1014)

>数字入力の際にラベルやテキストに-100~100までしか表示できないようにするには、どのように記述すればいいのですか?

こんな感じ?

Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case Asc("0") To Asc("9")
KeyAscii = KeyAscii
Case Asc("-")
KeyAscii = KeyAscii
Case Else
KeyAscii = 0
End Select
End Sub

Private Sub Text1_Validate(Cancel As Boolean)
If ((CLng(Text1.Text) < -100) Or (100 < CLng(Text1.Text))) Then
Beep
Cancel = True
End If
End Sub

#1、#2のひとと同じことですけど・・・(ヒマなんで・・)
-PR-
-PR-

その他の回答 (全2件)

  • 回答No.1
レベル10

ベストアンサー率 24% (47/191)

あんまり賢くないやりかたですが、タイマーでラベル/テキストを 監視しておいて、-100~100以外の値が入ったときにメッセージ ボックスをだしてクリアする、というのはどうですか? ...続きを読む
あんまり賢くないやりかたですが、タイマーでラベル/テキストを
監視しておいて、-100~100以外の値が入ったときにメッセージ
ボックスをだしてクリアする、というのはどうですか?
お礼コメント
1976no12ri29

お礼率 29% (17/57)

ありがとうございました。参考になりました。
投稿日時 - 2002-03-13 17:14:31


  • 回答No.2
レベル7

ベストアンサー率 28% (4/14)

すいません。少し質問の意図が良く分かってないのですが ただたんにボタンを押下された時にテキストボックスかラベルをチェックして やればいいんじゃないですか?
すいません。少し質問の意図が良く分かってないのですが
ただたんにボタンを押下された時にテキストボックスかラベルをチェックして
やればいいんじゃないですか?
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ