Vb6 VB:在For循环中声明变量

Vb6 VB:在For循环中声明变量,vb6,for-loop,Vb6,For Loop,我已经尝试在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 wCoun

我已经尝试在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

在尝试访问图像变量的任何属性之前,必须将有效的图像对象分配给该图像变量。例如,这很好:

    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

错误是否为NullReferenceException?@matt:否,是“未设置对象变量或带块变量”。谢谢!然而,不幸的是,我担心我需要更多的帮助。如果我试图使用Image.FromFile(“PATH”),它说明找不到这样的函数。我试着在谷歌上搜索,找到了“LoadPicture”,但我似乎也无法让它工作。你有没有想过这个函数是什么?对不起,我没有使用VB6。它看起来像tile1.Picture=LoadPicture(“路径”)将执行上面的示例所做的操作。如果这不起作用,我不知道为什么。也许如果您在原始帖子中发布了更多的代码,那么具有更多VB6知识的人可能会看到您的问题。我希望我能帮上更多的忙。无论如何,谢谢你的帮助。我会亲自调查的。同时,我将你的答案标记为答案,因为这显然在通往答案的道路上帮了我很大的忙。