[Creat0R]

Я не разу не использовал функцию цикла »

А в чём проблема, в справке есть ведь примеры.

Вот мой код »

Коды нужно заключать в соот-ющие теги ([codе])...

Код:

While 1
    $msg2 = InputBox("Прога", "Введите номер: 1, 2, 3... max 7")

    If @error = 1 Then
        MsgBox(4096, "Прога", "OK. Bye!")
        Exit
    EndIf

    Switch $msg2
        Case 1
            $shet = 0
        Case 2
            $shet = 17
        Case 3
            $shet = 34
        Case 4
            $shet = 51
        Case 5
            $shet = 68
        Case 6
            $shet = 85
        Case 7
            $shet = 102
        Case Else
            MsgBox(0, "Прога", "НЕПРАВИЛЬНЫЙ ВВОД ПАРАМЕТРА")
            ContinueLoop
    EndSwitch

    ExitLoop
WEnd