Question

Como sacar un descuento en visual basic 6 ?

Answer 1

    Dim N As Integer        Dim monto As Double        N = TextBox1.Text        If (N > 700) Then            monto = N - (N * 0.7)            TextBox2.Text = Trim(monto)        Else            If (N <= 700 And N > 50) Then                monto = N - (N * 0.7)                TextBox2.Text = Trim(monto)            Else                TextBox2.Text = Trim(N)            End If        End If    End SubEnd Class

tomalo como ejemplo yo lleve visual basic en la prepa pero ya no me acuerdo de algunas cosas espero a verte ayudado

y dime si no copie nada por lo hice a punta de tecleo :) si asi disculpas haci ti