En este grupo En todos

Grupo de Iniciate en Visual Basic 6



Proyecto

Francisco J
Ingenieria industrial instituto tecnol...
Escrito por Francisco J Torres S
el 26/05/2010

Buenas

he querido hacer un proyecto en VB 6. 0, pero no he podido hacerlo.

Quiero hacer una especie de cuestionario y colocar la respuesta correcta y una incorrecta en el Fom 1, y al sujerir la correcta que salga un mensaje de OK y la incorrecta que salga una Imagen de Error, o algo por el estilo....... Pero no he podido Ud. Saben como?

Saludos

Aritz_1996 Lopez
Guipúzcoa, España
Escrito por Aritz_1996 Lopez
el 13/07/2010

Pones tantos Frames como preguntas tenga el cuestionario, y dentro de esos Frames las posibles respuestas con varios OptionButton
Al final del Form Pones un CommandButton



Eso seria el form

El codigo del form seria mas o menos esto:


'Declara la variable de los puntos como para que contenga numeros enteros
Dim Puntos As Integer

Private Sub Command1_Click()

'Al acer click en el boton, que ponga los puntos a cero
Puntos = 0

'Que si la opcion 1 esta seleccionada, que sume un punto
If Option1. Value = True Then
Puntos = Puntos + 1
End If

'Que si la opcion 4 esta seleccionada, que sume otro punto
If Option4. Value = True Then
Puntos = Puntos + 1
End If

'Si tiene dos puntos
If Puntos = 2 Then

'Ponga un mensaje de felicitacion
MsgBox "Felicidades has acertado todas", vbInformation + vbOKOnly, "Felicidades!"

'Sino tiene los dos puntos...
Else

'Aparece mensaje de vuelva a intentarlo
MsgBox "No has acertado, intentalo de nuevo", vbCritical + vbOKOnly, "Error"
End If

End Sub

Private Sub Form_Load()

'Desactiva todas las cassillas al cargar el form
Option1. Value = False
Option2. Value = False
Option3. Value = False
Option4. Value = False
End Sub

Aritz_1996 Lopez
Guipúzcoa, España
Escrito por Aritz_1996 Lopez
el 13/07/2010

Por cierto, si quieres descargar el proyecto ya hecho (Compilad y sin compilar), descargatelo aqui:

https://user.xthost.info/aritzh/Cuestionario. Zip

Noel Jesús León
Lic en educ . básica u.p.n
Escrito por Noel Jesús León
el 21/08/2010

Se me hace que empesaste muy alto para un grupo de inicirate le visual basic, la intención es buena, pero creo deberias plantear algo facil y para bajar archivos, tambien la pusiste complicada, hay ligas que con un clic lo bajar, un saludo y espero coalborar con algo