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

Тема в разделе "Visual Basic", создана пользователем Failor, 20 фев 2012.

  1. Failor

    Failor Гость

    Люди помогите. Мне нужно создать программу, которая просит пользователя ввести шесть имен, и после этого отображает только два имя в алфавитном порядке. первое имя hightName и второе имя lowName. вот мой код, но тут чего то нехватает
    Код (PHP):
    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
    спасибо большое
     
  2. AndreyMihailov

    AndreyMihailov Гость

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

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

    alex77755 Well-Known Member

    Регистрация:
    15 фев 2009
    Сообщения:
    128
    Симпатии:
    0
Загрузка...
Похожие Темы - Нужна Ваша Помощь
  1. devunion
    Ответов:
    1
    Просмотров:
    2.070
  2. art2023
    Ответов:
    3
    Просмотров:
    785
  3. msfconsole
    Ответов:
    0
    Просмотров:
    39
  4. slavkan777
    Ответов:
    2
    Просмотров:
    523
  5. devunion
    Ответов:
    4
    Просмотров:
    790

Поделиться этой страницей