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 As Image)выдает ошибку при попытке доступа к одному из свойств вновь добавленного изображения (например, 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