Visual Basic - Ayuda para un trivia

Life is soft - evento anual de software empresarial
   
Vista:

Ayuda para un trivia

Publicado por Andres (2 intervenciones) el 26/08/2009 17:00:49
Hola buenas demas esta decir q recien comienzo en esto y me mandaron un trabajo q es un trivia masomenos lo tengo encaminado, pero al hacer la sentencia while para q al dar aceptar me salte la pregunta no me carga las preguntas en la label masomenos fue esto lo q hice:

'opcion explicita
Dim n As Integer
Dim puntos As Integer

Select Case n

Case 1
Label1.Text = "¿En que siglo se descubrio el planeta Neptuno?"
opcion1.Text = "siglo XIX"
opcion2.Text = "siglo XX"
opcion3.Text = "siglo XVIII"
opcion1.Checked = False
opcion2.Checked = False
opcion3.Checked = False

Case 2
Label1.Text = "¿Cual es la raiz cuadreada de 121?"
opcion1.Text = "11"
opcion2.Text = "12"
opcion3.Text = "13"
opcion1.Checked = False
opcion2.Checked = False
opcion3.Checked = False

No se si esta muy claro pero cualquier cosa me preguntan cada pregunta tiene 3 pociones y en realidad la variable yo pense q la declaraba en el load del formulario pero si no la declaro aqui me subrraya error. Estoy trabajando en V.B 2005
muchas gracias espero respuestas
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda para un trivia

Publicado por edic (40 intervenciones) el 26/08/2009 22:38:33
hola amigo prueva con esto pero recuerda que yo utilizo visualbasic 6

Dim n As Integer
Dim puntos As Integer
n = 1
Select Case n

Case 1
Label1.Caption = "¿En que siglo se descubrio el planeta Neptuno?"
Option1.Caption = "siglo XIX"
Option2.Caption = "siglo XX"
Option3.Caption = "siglo XVIII"

End Select

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda para un trivia

Publicado por andres (2 intervenciones) el 28/08/2009 18:49:46
Gracias por la respuesta, pero probe y nada.Asique sigo escuchando!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar