Ola... estou a fazer um jogo tipo o "quem quer ser milionario"...
e preciso de criar perguntas e respostas... e pôr a pergunta numa textbox e as 4 respostas outras textbox's!
vi isto na internet... será q ajuda?
s alguém poder ajudar a descodificar e por as perguntas e respostas nas textbox's... agradecia!
se tiverem uma maneira mais facil de fazer, tambem n m importo q m digam.
s alguém poder ajudar a descodificar e por as perguntas e respostas nas textbox's... agradecia!
se tiverem uma maneira mais facil de fazer, tambem n m importo q m digam.
Aguardo resposta! Obrigado
e preciso de criar perguntas e respostas... e pôr a pergunta numa textbox e as 4 respostas outras textbox's!
vi isto na internet... será q ajuda?
s alguém poder ajudar a descodificar e por as perguntas e respostas nas textbox's... agradecia!
se tiverem uma maneira mais facil de fazer, tambem n m importo q m digam.
Código:
Module Module1
Structure Pergunta
Dim Texto As String
Dim Respostas() As String
Sub Inicializar()
ReDim Respostas(3)
End Sub
End Structure
End Module
Public Class Form2
Sub CriarPerguntas()
Dim Perguntas(19) As Pergunta
For i As Integer = 0 To 19
Perguntas(i).Inicializar()
Next
With Perguntas(0)
.Texto = "pergunta1"
.Respostas(0) = "respostaA"
.Respostas(1) = "respostaB"
.Respostas(2) = "respostaC"
.Respostas(3) = "respostaD"
End With
With Perguntas(1)
.Texto = "pergunta2"
.Respostas(0) = "respostaA"
.Respostas(1) = "respostaB"
.Respostas(2) = "respostaC"
.Respostas(3) = "respostaD"
End With
End Sub
s alguém poder ajudar a descodificar e por as perguntas e respostas nas textbox's... agradecia!
se tiverem uma maneira mais facil de fazer, tambem n m importo q m digam.
Aguardo resposta! Obrigado
Última edição pelo moderador: