■ ラベルを一気に消すには?

[Visual Basic 初心者掲示板] [過去ログの一覧]


タメ子 2008/02/12(火) 16:04:33 <初心者>
WindowsXP VB2005

下記のようなプログラムでタイマーにより、複数のラベルを一気に
表示・非表示を繰り返しています。
この程度 (9個) だと実際に動かした時点ではわからないのですが、
デバッグで1つ1つ処理を見ると、
ラベルを表示 (Visible = True) の場合は、この処理を抜けた時点
で一気に画面に表示されますが、非表示 (Visible = False) は、
ループ内で1つ1つ消しています。(実際に画面から1つ1つ消えます)

これを表示時と同じように処理を抜けた時点で一気に非表示にするには
どうすればよろしいでしょうか。

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

    Static aaa As Boolean

    Dim i As Integer

    Me.SuspendLayout()

    For i = 1 To 9 Step 1

        If aaa = True Then
            LabelArray1(i).Visible = True
        Else
            LabelArray1(i).Visible = False
        End If

    Next

    Me.ResumeLayout(False)

    aaa = Not aaa

End Sub

やじゅ 2008/02/12(火) 23:08:02 <上級者>
パネルの上にラベルコントロールを貼ればいいんでないの。
パネル.Visibe = True or Falseのみで済みますが

毎週金曜日はポイント最大3倍!さらに4倍のチャンスも!

Programming Library