🚀 go-pugleaf

TAMAKI Masahiko wrote in message
<01bd58c5$b85016e0$LocalHost@tamaki.tinet-i.ne.jp>...
>こんにちは。玉城です。


ご教示いただけるとは思いませんでした。大変ありがたく思います。
必要があってＶＢを始めて一年ほどになりますが、コーディングのさまざまの場面で
示唆をいただいてきました。ありがとうございました。

>tutomu <sinohara@bronze.ocn.ne.jp> wrote in article
><6fd78r$i1u$1@nn-os001.ocn.ad.jp>...
>>
>篠原といいます。リストボックスは、ボックス内のリストをクリックしないと選択
>状
>> 態になりません。
>>
>けれども、リストのアイテムを一つだけ表示しておいて、スクロールする度に、現
>在
>> 表示されたものがそのまま
>>
>選択状態になるようにしたいときもあります。しかしこれが簡単そうでできません
>。
>
>初期化処理(Form_Load等で)
>  List.ListIndex = 0
>としておくか、


この方法では、確かに最初のアイテムが選択状態で表示されますが、リストボックス
をスクロールさせても
この選択状態は、次のアイテムに異動するわけではありません。
けれどもユーザーは眼前にあるアイテムが選択されていると思いこみ、次の作業に進
んでしまいます。
従ってこの下にあるような、「全く選択されていない状態」を判別しても意味があり
ません。
ユーザーは確かに一つを選択しているが、しかしそれは、別のアイテムになっている
訳です。

>[OK]ボタン等で If List.ListIndex = -1 Then で判別し、
>警告を発すれば良いと思います。
>_/_/_/ 玉城真彦 tamaki@tinet-i.ne.jp
>_/_/_/ Visual Basic増強作戦 http://www.vector.co.jp/authors/VA010786/
>
>>

実はリストのアイテムは、１から１００までの数字になっており、リストボックスの
表示の高さは１アイテム分にしてあります。
そうしなければ、フォームがデザイン上難しかったのです。
そして、リスト中のどれかのアイテムがクリックされると、List1_Clickイベント
で、直ちにその選択されたアイテムの数字によって次の処理が始まることになる仕組
みにしてあります。
処理の内容は、配列中の１から１００までのランダムな数字５００個ほどをスキャン
して、リストボックスの選択された数字より大きな数字の個数と小さな数字の個数を
数えてラベルに表示するものです。

Scrollイベントのあとで、現在表示されているＬｉｓｔ番号が取得できるとよいので
すが、試してみましたが、私にはできませんでした。
リストボックスの仕様を越えて使おうとしているのかも知れません。
けれども、できないわけでもなさそうな気がして、気持ちの収まりがつかないので、
困っているわけです。
重ねてご教示いただけるなら幸いです。
sinohara@bronze.ocn.ne.jp
篠原　勉