環境はXP、VB６です。
イメージをコントロール配列にして、タイマーによって１秒間隔で
フォーム内にイメージを表示させ、位置を変える処理を作っています。
タイマーの処理は
img(Index).Top = img(Index).Top + 250
としているのですが、配列の要素が増えてindexが変わってしまうと
その前に表示されたイメージの動きが止まってしまいます。
各イメージはフォームの一番上から下へ落としたいです。
文章で説明するのが難しいのですが、改善策があればよろしくお願いします。
どのタイミングで配列の要素が増えるんですか？
配列の要素が確定してからタイマーで動かすとか
アルゴリズムが変なのは確か、ソースコードが提示
されてない以上、自分で値を追って解決するしかないかな。
フォーム内にタイマーは２つあり、１つは１秒おきにイメージを
表示させるもの、もう１つは表示したイメージを0.5秒おきに下へ
移動させるものです。
３秒経てばフォーム内には３つのイメージが表示されており、その
３つを同じように下へ移動させたいんです。
For i = img.LBound To img.LBound
img(i).Top = img(i).Top + 250
Next
とか。
＞QUE さん
遅くなりました。
LBound は使わなかったんですが、似たような感じで
ループ回してできました。
ソースコードもおとさずに質問してしまってすみません。
ありがとうございました。