Listbox - Отображение результатов в строку - Visual Basic .NET

Формулировка задачи:

Всем доброе время суток. Вот работаю с этим кодом.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim i, a, b, y, h As Double
        a = CDbl(TextBox1.Text)
        b = CDbl(TextBox2.Text)
        h = CDbl(TextBox3.Text)
        For i = a To b Step [h]
            y = Sin(4 * i) - 2
            If y < 1.2 Then
                ListBox1.Items.Add(CStr(i))
                ListBox1.Items.Add(CStr(y))
            End If
            Next
End Sub

Помогите сделать так, что бы в ListBox1 конечный результат выводился в строчку а не в столбик. И так что бы (i) было на одной строчке, а (y) на другой. Спасибо.

Решение задачи: «Listbox - Отображение результатов в строку»

textual
                            Листинг программы 
                        

                            Function vvodT(ByVal T As TextBox) As Single
        Return CSng(T.Text)
    End Function
                        