はじめまして。
Visual Basic2005を使用しています。

現在、Timerを使用してListViewに表示されたItemを１行づつ上から順番に選択状態にするプログラム（以下参照）を書いています。

---------------------------------------------------------------------------
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        mon = mon + 1
        If mon = 1 Then
            ListView2.Items(0).Selected = True
            ListView2.Items(1).Selected = False
            ListView2.Items(2).Selected = False
            ListView2.Select()  'ListView をアクティブにする
        ElseIf mon = 2 Then
            ListView2.Items(0).Selected = False
            ListView2.Items(1).Selected = True
            ListView2.Items(2).Selected = False
            ListView2.Select()
        ElseIf mon = 3 Then
            ListView2.Items(0).Selected = False
            ListView2.Items(1).Selected = False
            ListView2.Items(2).Selected = True
            ListView2.Select()
        End If
---------------------------------------------------------------------------

当然ですが、上記のプログラムでは、３つ（決まったItem数）の場合しか動作しません。

Itmeの数が４つや５つなどに増えても、１つや２つに減っても、その数に合わせて１行づつ上から選択状態にしたいのですが、うまくいきません。
最終的には、Itemが５０や１００といった数でも、それに合わせて１行づつ選択状態にしたいと考えています。


説明がうまくできずに、伝わらない部分があるかと思いますが、どなたかご教授よろしくお願いします。

> Itmeの数が４つや５つなどに増えても、１つや２つに減っても、その数に合わせて１行づつ上から選択状態にしたいのですが、うまくいきません。
> 最終的には、Itemが５０や１００といった数でも、それに合わせて１行づつ選択状態にしたいと考えています。
>
リストの個数は ListView1.Items.Count で取得できるので For文を使用して全Itemの選択解
除後、 ListView2.Items(mon).Selected = True すればそこそこ動作すると思いますよ。
あと、mon が ListView1.Items.Count-1 を超えた場合に動作を停止するようにしてくださ
い。

ＧＯＤさんありがとうございます！
お礼が遅れてしまって申し訳ありません。

参考にして頑張ってみます。
また、わからなくなったら質問させていただきます。

ありがとうございました。