インターフェイス プログラミングでは、TextBox コントロールだけが数値入力を受け取り、他の入力は無視されることがあります。これを実現するにはどうすればよいでしょうか。具体的なソースコードは以下の通りです。
TextBoxにKeyPressイベントを追加します
プライベートサブテキスト1_KeyPress(KeyAscii As Integer)
KeyAscii <> 8 かつ KeyAscii < 48 または KeyAscii > 57 の場合
ビープ
キーアスキー = 0
終了の場合
エンドサブ
上記の具体的な原理は、押されたキーの KeyAscii 値が 48 ～ 57 の間であるかどうかを判断することです。48 ～ 57 の間であれば、入力は数値であり、それ以外の場合は数値ではありません。ただし、場合によっては、戻るキーを使用することもあります。この場合、入力を容易にするために KeyAscii <> 8 を追加して、戻るキーを使用するときに無視されないようにする必要があります。