VB：在 For 循环中声明变量

Question

我已经尝试在 For 循环中声明变量已经有一段时间了，但我一直没能找到方法。
每次在二维数组（测量 32x16）中遇到特定数字时，我都会尝试创建一个新图像（平铺）。我可能需要补充一点，我使用的是 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

但是，上面的代码（使用 Dim tile1 作为图像）在尝试访问新添加的图像（例如 tile1.Width）的属性之一时给我一个错误。

有没有办法在运行时以这种方式声明变量？

真诚
- Birjolaxew

Answer 1

在尝试访问 Image 变量的任何属性之前，您必须将有效的 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