(ゼロ・エス)としました。CH3-1「入力ボックス」プログラムの改良メインルーチンの画面構成を崩さずに入力させるために、入力範囲を指定したい。そこで、メインルーチンで入力桁数を指定すると、それに従って入力範囲を制限する機能を追加します。パラメータとして指定することにします。メインルーチンから呼び出す時には、以下のようにします。表示して、桁数が分かるようにしようと思います。">"NextこのようにFor文を使うことにします。うまく使って、これを完成させます。X+1,Y,">"です。X+I-1,Y,">"Nextとすれば良いことが分かります。数字が上書きされて、入力値が表示されます。入力範囲の表示があれば、入力モードであることが分かります。無くなるので、入力モードかどうか分からなくなります。そこで、画面右下に入力モードであることを別途表示させることにします。入力確定すれば入力モードが終了するので、確定をうながす「インジケータ」を表示します。インジケータを表示しないこのように、3種類から選べるようにしておきます。新たなパラメータとして使用することにし、Eが2でパターン2、Eが1でパターン1、Eが0のときはこれら以外でパターン0とします。以下のコードを追加します。以下のコードを追加して、この表示を消去します。今のままだと、入力範囲が表示されるだけで、実際に入力する場合は何桁でも入力できてしまうので、パラメータDで指定した桁数を超えて入力できないように、制限をかける必要があります。超えないようにします。未満になるようにすれば、桁数を管理できます。未満にするかの細かいことは、実際のコードで正しい方を選択しますが、今は考え方のみを決めます。以下の時だけ、このブロック内の処理を実行するようにします。CIfEnd:IfEnd(追加部分を赤文字で示した)入力桁数D=10と設定されているとします。