Ayuda con visual basic 6.0 gracias

Cerrado
juju - 13 jun 2009 a las 16:03
 MatuteMza - 20 jun 2009 a las 06:32
Hola,

nesecito ayuda con un programa de visual basic consta de lo siguiente:
hay una pregunta la respuesta de dicha pregunta esta en un combo el cual tiene 3 opciones.

yo lo tengo de la siguiente manetra.

cuando se intente por primera vez debe hacer lo siguiente
Private Sub Combo1_Click()

If Combo1 = "Francisco Tovar" Then

a = MsgBox("10 PUNTOS A TU FAVOR", vbInformation + vbOKOnly, "YES")
p = p + 10

Else
a = MsgBox("tienes otra oportunidad", vbInformation + vbOKOnly, "NO GANAS PUNTOS")
End If

y aca si la respuesta es incorrecta en la primera vez la segunda vez que intente debe hacer lo siguiente
If Combo1 = "Francisco Tovar" Then

b = MsgBox("ganas 5", vbInformation + vbOKOnly, "YES")
p = p + 5

Else
b = MsgBox("pierdes", vbInformation + vbOKOnly, "NO GANAS PUNTOS")
End If

Text1.Text = p
End Sub
Consulta también:

1 respuesta

Hola Amigo, como estas?

Mi nombre es Matias y soy de Argentina.

No tengo problemas en ayudarte, si quieres puedes agregarme a tu lista de contacto de messenger o escribirme un correo con PROYECTOSISTEMAS07@HOTMAIL.COM, te puedo ayudar con eso o algun programa completo.

Saludos
0