Как сделать вопрос " да " или " нет " с различными исходами в зависимости от входных данных?
У меня есть программирование на базовом уровне в средней школе, и мне было поручено сделать проект, в котором я должен был сделать программу, которая здоровается с учителем, а также дать абзац, описывающий, почему программирование ценно в наше время.
Моя первоначальная идея состояла в том, чтобы сделать программу, которая приветствует и задает учителю вопрос о том, хотят ли они знать, почему программирование ценно. Когда консоль задаст вопрос, будет два варианта: Да или нет, каждый из которых имеет свой собственный текстовый вывод.
Module Module1 Sub Main() REM Test Dim Yes As String Dim No As String Console.WriteLine("Hello, Would you like to know why programming is valuable? Yes or No") Yes = Console.ReadLine No = Console.ReadLine If Console.ReadLine = Yes Then Console.WriteLine("Well...1") End If If Console.ReadLine = No Then Console.WriteLine("Well...2") End If End Sub End Module
Это работает, но я должен поставить "да" на консоль три раза, прежде чем появится "Ну...1", а когда я проверяю его с помощью "Нет", "ну...1" появляется вместо "Ну...2". иногда "Ну...2" появляется, но это редко.
Что я уже пробовал:
Я перепробовал все, что мне предлагали на других форумах, но безуспешно. Пока что это тот код, с которым я добился наибольшего успеха, но все же получил несколько недостатков.