Dado el valor de venta de un producto hallar el igv y el precio de venta

Public Class Form3

    Dim vv, igv, pv As Single

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        vv = Val(Me.TextBox1.Text)

        igv = vv * 0.19

        pv = vv + igv

        Me.TextBox2.Text = Str(igv)

        Me.TextBox3.Text = Str(pv)

    End Sub

End Class