Блог

Главная - Вопросы по программированию - как заставить мою программу задавать вопросы один за другим

как заставить мою программу задавать вопросы один за другим

#vb.net

#vb.net

Вопрос:

 Private Sub Button_Click(sender As Object, e As EventArgs) Handles _
    cmdangry.Click, cmdconfused.Click, cmdsad.Click, cmdhappy.Click, cmdtired.Click, cmdhurt.Click, cmdexcited.Click, cmdsurprised.Click



        Dim answer As Integer = 0
        Dim question As Integer

        Select Case DirectCast(sender, Button).Name
                Case cmdconfused.Name
                    answer  = 1
                Case cmdangry.Name
                    answer  = 2
                Case cmdsad.Name
                    answer  = 3

                Case cmdhappy.Name
                    answer  = 4

                Case cmdtired.Name
                    answer  = 5

                Case cmdhurt.Name
                    answer  = 6

                Case cmdexcited.Name
                    answer  = 7

                Case cmdsurprised.Name
                    answer  = 8

            End Select

Это мой код, и я собираюсь, чтобы моя программа задавала вопрос типа «если мне грустно, какое лицо я бы сделал», тогда пользователь нажмет соответствующую кнопку (cmdsad), а затем текстовое поле на несколько секунд загорится зеленым, а если оно неправильное, оно загорится красным. Кажется, я не могу понять, как заставить мою программу задавать вопросы один за другим. Я знаю, как настроить операторы if-else . Обратите внимание, что вопросы будут задаваться с использованием записи голоса

Комментарии:

1. Добавьте вопросы в какую-нибудь коллекцию — возможно, a Queue(Of T) — и затем получайте следующий вопрос из коллекции при каждом нажатии Button .

2. @jmlcilhinney как мне это сделать?

3. Вы опубликовали свой комментарий через 5 минут после моего, что означает, что вы не задумывались об этом или не проводили никаких исследований для себя. Сначала приложите усилия, спросите, когда вы столкнетесь с проблемой.

4. @jmlcilhinney вот в чем дело, я действительно не знаю, как это сделать. Я прошу прощения, если кажется, что я не приложил усилий, но я действительно потратил на это несколько часов

5. Знаете ли вы, что раньше вы должны использовать коллекцию? Теперь вы это делаете, поэтому у вас есть что-то конкретное для исследования, чего у вас не было раньше. Вы читали документацию для Queue(Of T) класса? Вы искали в Интернете информацию о том, как добавлять и удалять элементы в Queue(Of T) ? Многочасовое вращение ваших колес не имеет никакого значения. Когда кто-то дает вам что-то конкретное для изучения, изучите это. Возможно, вам все еще понадобится дополнительная помощь, чтобы пройти весь путь, но вы все равно можете попытаться пройти часть пути самостоятельно.