[.NET] 請問迴圈中Label的宣告法

[borland (borland)]

  各位好，我想寫一個迴圈

  每個Label去excel一格一格讀取資料

  也就是將以下的程式

  Dim xlsApp, xlsSht, xlsWb As Object
  xlsApp = CreateObject("Excel.Application")
  xlsWb = xlsApp.Workbooks.Open("C:\Book1.xls")
  xlsSht = xlsWb.Worksheets(1)

  lbl1.Text = xlsSht.Cells(1, 1).Value
  lbl2.Text = xlsSht.Cells(2, 1).Value
  lbl3.Text = xlsSht.Cells(3, 1).Value
  lbl4.Text = xlsSht.Cells(4, 1).Value
  lbl5.Text = xlsSht.Cells(5, 1).Value

  改成
  Dim xlsApp, xlsSht, xlsWb As Object
  xlsApp = CreateObject("Excel.Application")
  xlsWb = xlsApp.Workbooks.Open("C:\Book1.xls")
  xlsSht = xlsWb.Worksheets(1)
  Dim i As Integer
  For i = 1 To 5
  lbl(i).Text = xlsApp.Cells(i, 1).Value

  不過顯示出來是不認識lbl (這是在設計頁面所拉的label)

  如果多定義一個 Dim lbl(5) As Label

  最後一行的錯誤就變成 並未將物件參考設定為物件的執行個體

  是我少宣告什麼嗎

  謝謝各位

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.131.74.54
推 fumizuki:Set lbl(i) = New Label
→ fumizuki:^^^^不用set