- 締切済み
アクセスVBAで空番号(欠番号)検索表示したい
アクセスVBA初心者です!! 番号の欠番を取得して、入れ込みたいです。 番号は入力可能です。表示されるのはリストボックスを作っています。 今出来てる処理は↓です。 1234 ←保存済みだとする。 3 ←保存すると、3が上書きされる 1234 になる。 2 ←保存すると、2が上書きされる 1234 になる。 空 ←保存すると、12345 になる。 8 ←保存すると、123458 になる。 空 ←保存すると、1234568 になりたい!! これのソースをおしえてほしいです。。 よろしくおねがいします!!!
- みんなの回答 (1)
- 専門家の回答
みんなの回答
疑問1、番号の欠番を取得?無い番号は取得できる訳もなし・・・。 疑問2、入れ込みたい?テーブル、それともリストボックス・・・。 疑問3、リストボックスに入れ込んでどうなる?意味ないな・・・。 疑問4、テーブルへの登録か?列1個を管理して何になる・・・。 入力データ1234が既登録データであればそのまま保存。 しかし、わざわざ保存する必要はなかろうに・・・。 入力データ1234が新規データであれば12345で保存。 しかし、なぜ、入力データと保存するデータが違うのだ。 ウーン!もっと、俺の頭が賢ければナー。 例えば、キーボードから入力した値によって数字を生成するとしよう。 生成するルールは、(1) 桁ごとの数字がユニークで、かつ、(2) 昇順である。 仮に、既に入力されている数字は1234だとしよう。 この場合、1、2、3、4の数字が入力されても新たな数字は生成されない。 ブランクが入力された場合、アペンドする数字は昇順の次の数字とする。 ブランクが入力された場合、アペンドする数字は昇順の空番の数字とする。 明示的な数字が入力された場合は、その数字を採用する。 こういう事かな。 しかし、生成のタイミングは何だ。 しかし、こんなプログラムを必要とするケースは何だ。 ともかく、以上の補足要求を参考に一度自分なりのソースを書いたがいいです。