Programa que calcula la comision de un asesor de venta

Se basa en calcula la comision segun su % por cualquier cantidad que halla sido la venta esta hecho en .net

Public Class Form26

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

        Dim V As Single

        Dim COMI As Single

        V = TextBox1.Text

        COMI = TextBox2.Text

        If (V > 3000000) Then

            Label3.Text = "SU COMISION ES DE :"

            Label4.Text = (V * COMI) / 100

        Else

            Label3.Text = " NO TIENE COMISION"

            Label4.Text = ""

        End If

    End Sub

End Class