VB：在For循環中聲明變量

Question

我一直在嘗試在For循環中聲明相當長一段時間的變量，而我一直都沒有找到辦法。
我試圖創建一個新的圖像（瓷磚）每次在二維數組中遇到一定數量（測量32×16）。我可能需要添加在我使用的Visual Basic 6

目前我使用下面的代碼：

Option Explicit 
Dim wCount As Integer 
Dim hCount As Integer 
Dim arrTiles(31, 15) As Integer 


Private Sub Form_Load() 
    For wCount = 0 To 31 Step 1 
     For hCount = 0 To 15 Step 1 
      ' -Declare variables 
      ' -I.E. Dim NAME As Image 
     Next 
    Next 
End Sub 

然而，上面的代碼（利用暗tile1作爲圖像）給我一個錯誤每當嘗試訪問新添加的圖像的某個屬性（如tile1.Width）時。

有什麼辦法在運行時以這種方式聲明變量嗎？

真誠
- Birjolaxew

Answer 1

您嘗試訪問它的任何屬性之前，必須指定一個有效的Image對象的圖像變量。例如，這工作正常：

For wCount = 0 To 31 Step 1 
     For hCount = 0 To 15 Step 1 
      ' -Declare variables 
      Dim tile1 As Image 
      tile1 = Image.FromFile("c:/test.png") 
      Dim width = tile1.Width 
     Next 
    Next