vb.net - テキスト ボックスへの書き込みが何度も失敗する - Visual Basic 2010

Question

これが簡単な間違いであり、VB にはまったく新しいものである場合はお詫びしますが、どこが間違っているのかわかりません。私のコードは、プロセスの最後にテキストボックスに書き込まれる結果を生成します。これは私が現時点で持っているコードです:

Public Class Form1
    Public Sub ButtonInput_Click(ByVal sender As System.Object, ByVal e As     System.EventArgs) Handles ButtonInput.Click
        Try
            'information irrelevant to question here..

            MainMethod.Main()

            TextBoxbf.AppendText(bestGlobalFitness.ToString("F4"))
            TextBox0.Text = bestGlobalPosition(0)
            TextBox1.AppendText(bestGlobalPosition(1).ToString("F4"))
            TextBox2.AppendText(bestGlobalPosition(2).ToString("F4"))
            TextBox3.AppendText(bestGlobalPosition(3).ToString("F4"))
            TextBox4.AppendText(bestGlobalPosition(4).ToString("F4"))
            TextBox5.AppendText(bestGlobalPosition(5).ToString("F4"))
            TextBox6.AppendText(bestGlobalPosition(6).ToString("F4"))

        Catch ex As IndexOutOfRangeException
            Console.WriteLine("IndexOutOfRangeException caught")
        End Try
    End Sub
End Class

ご覧のとおり、TextBox.Text メソッドと TextBox.AppendText メソッドの両方を試しましたが、どちらも機能していないようです。少し奇妙なのは、最初の行 TextBoxbf.AppendText(bestGlobalFitness.ToString("F4")) が機能することです..

モジュールに bestGlobalPosition と bestGlobalFitness を入力する方法は次のとおりです。

Module MainMethod
    Public bestGlobalFitness As Double
    Public bestGlobalPosition([Dim] - 1) As Double
Public Sub Main()
    Try
        Dim bestGlobalPosition([Dim] - 1) As Double
        bestGlobalFitness = Double.MaxValue

        'rest of method here..

        Console.Write("Final best fitness = ")
        Console.WriteLine(bestGlobalFitness.ToString("F4"))
        For i As Integer = 0 To bestGlobalPosition.Length - 1
            Console.Write("x" & i & " = ")
            Console.WriteLine(bestGlobalPosition(i).ToString("F4") & " ")

どこが間違っているのか本当にわかりません - どんな助けでも大歓迎です!