Epson RC170 Guia do Utilizador Página 178

  • Descarregar
  • Adicionar aos meus manuais
  • Imprimir
  • Página
    / 312
  • Índice
  • MARCADORES
  • Avaliado. / 5. Com base em avaliações de clientes
Vista de página 177
6. The SPEL+ Language
Example
The following example shows a simple error handling routine. When an error occurs,
program execution goes to the ErrHandler label, where the error handler starts. The error
number is displayed and the operator is asked to continue or not. If the operator enters "N"
then the program executes the Quit All statement to end the program.
Function Main
String cont$
Integer i
OnErr Goto Errhandler
For i = 1 To 10
Jump P(i)
Next i
Exit Function
' *** Error handler ***
Errhandler:
enum = Err
Print "Error #", enum, " occurred"
Print "Continue (Y or N)?"
Line Input cont$
Select cont$
Case "y", "Y"
EResume Next
Default
Quit All
Send
Fend
160 EPSON RC+ 5.0 (Ver.5.4) User's Guide Rev.4
Vista de página 177
1 2 ... 173 174 175 176 177 178 179 180 181 182 183 ... 311 312

Comentários a estes Manuais

Sem comentários