Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim dinero As Decimal
Dim programa As String
dinero = TextBox1.Text
programa = TextBox2.Text
If dinero >= 50000 Then
TextBox4.Text = "nos fuimos de rumba"
If programa = "si" Then
TextBox4.Text = "llamamos a otra"
End If
Else
If programa = "no" Then
TextBox4.Text = "salimos con esa a rumbear"
End If
End If
End Sub
No hay comentarios:
Publicar un comentario