Как вывести ответ на форму (аналог Print)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim b, p, d, f As Double
        b = 3.85 : p = 3.14
 
        For d = -2.3 To 0.01 Step 0.33
 
            f = Math.Pow((b + d), 1 / 3) * (Math.Cos((p / (d + 0.15))) / Math.Sin((p / (d + 0.15))))
            Print("\nf=%f", "d=%f", d, f)
 
        Next
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim b, p, d, f As Double
        b = 3.85 : p = 3.14
        Dim g As Graphics = Me.CreateGraphics
        Dim offcet As Integer
        For d = -2.3 To 0.01 Step 0.33
            f = Math.Pow((b + d), 1 / 3) * (Math.Cos((p / (d + 0.15))) / Math.Sin((p / (d + 0.15))))
 
            offcet += 12
            g.DrawString(String.Format("f={0} d={1}", d, f), Me.Font, Brushes.Black, New Point(1, offcet))
        Next
    End Sub