Доброго времени суток, коллеги!
Есть необходимость разработать интерактивное приложение в самом VBA. Оно простое на просчёт массивов. Однако, столкнулся с некой проблемой которую решить своими силами не могу банально из-за отсутствия знаний оного. Скажу сразу, что код абсолютно рабочий и багов или ошибок при компиляции нет.
Собственно говоря сама проблема:
На изображении №1 со стрелочкой можно увидеть, что выводится конкретно одно значение, а на изображении №2 в самом окне Immediate содержится их куда явнее, чем 1 строка. Собственно говоря каким образом сделать так, чтобы весь текст из Immediate изображения №2 был отоброжен в Textbox изображения №1 ?

Скрытый текст

Код вычисления массива Код ? 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 Sub lr9() Dim X As Single, dX As Single Dim F As Double Const Y = 2.1: X = 0.3 dX = UserForm1.TextBox1.Value 'dX = Val(InputBox("Значение шага изменения аргумента:", "Ввод dX")) Debug.Print "Результат:" Debug.Print "Для шага dX=" & dX 10  If (X < 0.9) Then F = X ^ Y + Y ^ X ElseIf (X >= 0.9 And X <= 1.5) Then F = X * Y Else F = Abs(2 * X - Y) End If UserForm1.TextBox2.Value = F Debug.Print "X=" & X, "F=" & F X = X + dX If X <= 2 Then GoTo 10 End Sub[/SPOILER][SPOILER=][B][FONT="Arial Black", Gadget][SIZE=13pt]Код кнопок UserForm [/SIZE][/FONT][/B][B][FONT="Arial Black", Gadget][SIZE=13pt] [/SIZE][/FONT][/B]Private Sub CommandButton1_Click()  lr9 End Sub    Private Sub CommandButton2_Click()  TextBox1.Text = "" TextBox2.Text = ""  End Sub   Private Sub CommandButton3_Click() UserForm1.Hide  End Sub   Private Sub CommandButton4_Click()  Application.Quit End Sub