Нужна Ваша Помощь Visual Basic Loops

[Failor]

Люди помогите. Мне нужно создать программу, которая просит пользователя ввести шесть имен, и после этого отображает только два имя в алфавитном порядке. первое имя hightName и второе имя lowName. вот мой код, но тут чего то нехватает

Module Module1
Const MAX_Names = 6
Sub Main()
Dim name As String
Dim lowName As String
Dim highName As String
Dim count As Integer

count = 0
Do Until count = MAX_Names
Console.WriteLine("Enter the name: ")
name = Console.ReadLine

highName = name
lowName = name



count = count + 1
Loop


Console.Write("High name is:" + highName + vbCrLf)
Console.Write("Low name is:" + lowName + vbCrLf)

End Sub
End Module

спасибо большое

 

[AndreyMihailov]

но тут чего то нехватает

Тут не хватает самого главного - сортировки по алфавиту. Ты просто выводишь два раз последнее веденное имя...

PS: Я, возможно, ламерю, но что за объект такой Console? Суть понятна, но VB6 его не знает и ругается на твой код...

 

[alex77755]

На счёт консоли

Ссылка скрыта от гостей