Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB .NET > Найдите ошибку в коде

Автор: Polen 4.11.2015, 21:58

Найдите, пожалуйста, ошибки в коде:

Код


Module Module1

    Sub Main()
        Dim a As Integer
        Dim b As Integer
        Dim s As String
        Dim c As Integer
        Console.ReadLine(a)
        Console.ReadLine(b)
        Console.ReadLine(s)
        If s = "+" Then
            c = a + b
        ElseIf s = "-" Then
            c = a - b
        ElseIf s = "x" Then
            c = a * b
        ElseIf s = ":" Then
            c = a / b
        End If
        Console.WriteLine(c)
    End Sub

End Module

Автор: diadiavova 5.11.2015, 00:27

Polen, ReadLine возвращает значение и не принимает аргументов

Код


s = Console.ReadLine()

Кроме того, функция возвращает строку, а не число, поэтому надо еще преобразовать строку в число.

Код


a =  Integer.Parse(Console.ReadLine()) ' для b то же самое

Еще очень желательно предлагать ввести данные и пояснить какие именно. То есть перед ReadLine сначала вызывать Write с текстом, например "Введите первое число", "Введите знак действия" и так далее. Но это уже не ошибка, а просто рекомендация.