Re: [VB6 ] 可以使用迴圈控制物件嗎?

[cole945 (躂躂..)]

※ 引述《ClubT (風)》之銘言：
: 假設我現在有10個Label的物件
: 物件名分別是Label1, Label2 ... Label10
: 可以利用回圈的方式來更改這10個Label的屬性嗎?

    vb6本來就可以把控制項開成陣列~
    你只要把 Name 設成一樣, 他就會問你要不要建立陣列~
    然後你就可以用 For 來跑這些 Lables
    (vb6會自己幫你設Index,你也可以在屬性修改)
    ' 用起來會像這樣, 這是一個 Label1 的陣列
    For i = 0 To Label1.Count - 1
        Label1(i).Caption = 1
    Next i


    另一種不用陣列的做法是這樣
    For i = 1 to 10
      Controls.Item("Label" & i).Caption = "1"
    Next i
    來設定 Label1 ~ Label10 的值..

    再不然就是用以下的程式跑整個form上的控制項..
    For i = 0 to Controls.Count
       if TypeName( Controls(i) ) = "Label"
          ' 如果他是 Label... blahblah.
       End if
    Next i

    大略有這幾種用法~

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.139.176.251
※ 編輯: cole945         來自: 220.139.176.251      (06/13 23:08)
※ 編輯: cole945         來自: 220.139.176.251      (06/13 23:10)
推 ClubT:感謝