Jump to content

Jogo de Perguntas e Respostas Aleatórias em VB.NET


Anouk

Recommended Posts

Olá a todos!

Estou a desenvolver um jogo do tipo Quem Quer ser Milionário, no âmbito de um curso profissional.

Neste momento tenho todas as perguntas num ficheiro em que cada linha tem o seguinte formato:

 

C1|Pergunta|RespostaCerta|RespostaErrada1|RespostaErrada2/RespostaErrada3|Pista

 

O "C1" é uma referência para saber que aquele registo pertence à Categoria de Ciências e ao Nível1.

Cada categoria vai ser 45 perguntas, divididas em 3 níveis de 15 perguntas.

Dessas 15 perguntas, vão ser selecionados aleatoriamente 5 em cada nível.

 

Fiz esta estrutura para ao ler conseguir selecionar a posição da substring que pretendo atribuir às labels no formulário:

Structure Registo
        Dim codigo As String
        Dim pergunta As String
        Dim certa As String
        Dim errada1 As String
        Dim errada2 As String
        Dim errada3 As String
        Dim pista As String
    End Structure

Do Until LerRegisto.Count = 15

            Posicao1 = LerRegisto.IndexOf("|") + 1
            Posicao2 = LerRegisto.IndexOf("|", Posicao1) + 1
            Posicao3 = LerRegisto.IndexOf("|", Posicao2) + 1
            Posicao4 = LerRegisto.IndexOf("|", Posicao3) + 1
            Posicao5 = LerRegisto.IndexOf("|", Posicao4) + 1
            Posicao6 = LerRegisto.IndexOf("|", Posicao5) + 1

            With LinhaRegisto
                .codigo = LerRegisto.Substring(0, Posicao1 - 1)
                .pergunta = LerRegisto.Substring(Posicao1, Posicao2 - Posicao1 - 1)
                .certa = LerRegisto.Substring(Posicao2, Posicao3 - Posicao2 - 1)
                .errada1 = LerRegisto.Substring(Posicao3, Posicao4 - Posicao3 - 1)
                .errada2 = LerRegisto.Substring(Posicao4, Posicao5 - Posicao4 - 1)
                .errada3 = LerRegisto.Substring(Posicao5, Posicao6 - Posicao5 - 1)
                .pista = LerRegisto.Substring(Posicao6)
            End With

            ctdRegisto += 1

        Loop

 

Já tenho 2 rotinas para atribuir números aleatórios às perguntas e às respostas, respectivamente.

Já testei a aleatoriamente das respostas e está a funcionar bem.

O que não estou a conseguir fazer é selecionar aleatoriamente as perguntas de um determinado intervalo. Não sei onde guardar essa informação. Já tentei guarda as linhas de registo num vetor, mas não resultou.

 

Agradecia a quem me pudesse ajudar.

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.