vb.net - Visual Basic 中嵌套循环中的堆栈溢出

Question

我在我的程序中创建了一个构造函数，但它一直给我堆栈溢出异常。我尝试更改参数，但没有帮助...

Public Sub New()
    InitializeComponent()

    For i As Integer = 0 To i = 12
        For j As Integer = 0 To i = 9
            atomcode(i, j) = (i * 10000 + j * 1000 + 99)
        Next j
    Next i

End Sub

Answer 1

我不确定您是尝试输入代码还是粘贴代码。For您的语句的格式是错误的，并且在您使用的第二个语句中，如果它有效，这两个语句都会递增 j 直到jis = 9，这将导致您的 stackoverflow。像这个简单的控制台程序示例这样的东西应该可以工作。此外，您的上述代码编译的唯一方法是，如果您有，请帮自己一个忙并将其放在类的顶部，它将防止隐式缩小转换并为您省去很多麻烦。iiOption Strict OffOption Strict On

Option Strict On
Module Module1
    Dim atomcode(,) As Integer

    Sub Main()
        ReDim atomcode(12, 9)
        For i As Integer = 0 To 12
            For j As Integer = 0 To 9
                atomcode(i, j) = (i * 10000 + j * 1000 + 99)
            Next j
        Next i

    End Sub 

End Module