Добре дошли!

Добре дошли в нашите форуми, пълни с полезна информация. Имате проблем с компютъра или телефона си? Публикувайте нова тема и ще намерите решение на всичките си проблеми. Общувайте свободно и открийте безброй нови приятели.

Моля, регистрирайте се за да публикувате тема и да получите пълен достъп до всички функции.

Console App (VB Помощ)

Нова тема

21 юни 20169 г.

Здравейте! Има една задача, която дори не знам как да я реша, и ако може някой да ми помогне ще съм му много благодарен

Мъча се да направя един Console Application, който при въвеждане на номер от 1 до 7 примерно въведа 1 и ми показва Понеделник, въведа 5 и ми въвежда петък и т.н.. Някой може ли да удари едно рамо?

Цитирай

21 юни 20169 г.

Module Module1

    Dim weekdays(8) As String

    Dim a As Integer
    Dim b As String

    Sub init()
        weekdays(1) = "Monday"
        weekdays(2) = "Tuesday"
        weekdays(3) = "Wednesday"
        weekdays(4) = "Thursday"
        weekdays(5) = "Friday"
        weekdays(6) = "Saturday"
        weekdays(7) = "Sunday"
    End Sub

    Sub Main()
        init()
r1:
        Console.WriteLine("Input a number from 1 to 7")
        b = Console.ReadLine()
        a = CInt(b)
        If a > 7 Then GoTo r2
        Console.WriteLine(weekdays(a))
        GoTo r1
r2:
    End Sub

End Module

Редактирано 21 юни 20169 г. от Реджеп Иведик (преглед на промените)

Цитирай

21 юни 20169 г.

Автор

Жив и здрав!

Цитирай

Архивирана тема

Темата е твърде стара и е архивирана. Не можете да добавяте нови отговори в нея, но винаги можете да публикувате нова тема, в която да продължи дискусията. Регистрирайте се или влезте във вашия профил за да публикувате нова тема.