2015-03-27 2 views
0

Я ищу способ вернуться к предыдущему после того, как пользователь прочитает большое сообщение. Причина того, что он находится в отдельном подразделении, состоит в том, что он имеет более 50 строк текста, и я хотел сократить время загрузки. Должно быть, я поехал по всему Интернету, и мне не повезло найти ответ. Я попытался это, но получить «процесс завершается из-за StackOverflow Exception»как вызвать sub в том же модуле

Heres простой вариант моего кода:

Sub notes() 
    Dim a2 As String 
    Do Until a2 = ("b") Or a2 = ("B") 
     Console.Clear() 
     Console.WriteLine("--------------------------------------------------------------------------------") 
     Console.WriteLine("General Notes:") 
     'more lines of text 
     Console.WriteLine("--------------------------------------------------------------------------------") 
     Console.WriteLine("Engine Status:") 
     'more lines of text 
     Console.WriteLine("Press <B> to go back to the menu") 
     a2 = Console.ReadLine() 
    Loop 
    If a2 = ("b") Or a2 = ("B") Then 
     Call Main() 
    End If 


End Sub 
+0

Typo: «Я ищу способ вернуться к предыдущему югу после того, как пользователь прочитает большое сообщение». – Viper151

+1

Предполагая, что 'Sub notes' вызывается из' Sub Main', способ вернуться в Main - использовать оператор Return 'If a2.ToLower() =" b "Then Return'. Не пытайтесь снова вызвать Main. – Blackwood

ответ

1

notes После саб завершен, например, a2 = «б» или а2 = «B», программа автоматически вернется к основному югу (предположив, что вы вызвали его оттуда). Вы не можете вызвать модуль Main в модуле.

Смежные вопросы