Handbuch BasicMaker 2010 - SoftMaker

End Sub
MsgBox "Tag: " & Day(T1)
MsgBox "Monat: " & Month(T1)
MsgBox "Jahr: " & Year(T1)
MsgBox "Stunde: " & Hour(T1)
MsgBox "Minute: " & Minute(T1)
MsgBox "Sekunde: " & Second(T1)
Oct (Funktion)
Oct(Num)
Liefert eine Zeichenkette mit der oktalen Darstellung der angegebenen Zahl.
Num kann ein beliebiger numerischer Ausdruck sein; er wird auf die nächste ganze Zahl gerundet.
Siehe auch: Hex
Beispiel:
Sub Main
Dim Msg, Num
Num = InputBox("Geben Sie eine Zahl ein.")
Msg = Num & " dezimal entspricht "
Msg = Msg & Oct(Num) & " oktal."
MsgBox Msg
End Sub
On Error (Anweisung)
On Error Goto Label
Oder:
On Error Resume Next
Oder:
On Error Goto 0
Aktiviert eine Fehlerbehandlungsroutine zur Behandlung von Laufzeitfehlern:
Bei On Error Goto Label wird im Falle eines Laufzeitfehlers beim angegebenen Sprungziel Label fortgefahren.
Bei On Error Resume Next werden Laufzeitfehler einfach ignoriert. Vorsicht: Hierbei können im Falle eines Laufzeitfehlers
unvorhersehbare Ergebnisse geliefert werden.
Bei On Error Goto 0 wird die Fehlerbehandlung deaktiviert – Laufzeitfehler führen dann wieder wie gewohnt zum
Programmabbruch mit einer Fehlermeldung.
Eine On Error-Anweisung gilt nur innerhalb der Subroutine oder Funktion, in der sie sich befindet.
Wurde mit On Error Goto zu einem Label verzweigt, kann die Script-Ausführung von dort aus mit der Resume-
Anweisung wieder aufgenommen werden. Das Script wird dann in der nächsten Zeile fortgesetzt.
Siehe auch: Resume
Beispiel:
In diesem Beispiel wird absichtlich ein Fehler ausgelöst, um die Fehlerbehandlungsroutine beim Label "Fehler" auszulösen.
Darin wird der Anwender gefragt, ob die Ausführung des Scripts fortgesetzt werden soll. Bei "Ja" wird das Script
mit Resume Next in der nächsten Zeile nach dem Laufzeitfehler fortgesetzt, bei "Nein" wird die Ausführung mit Stop
beendet.
314 Anweisungen und Funktionen von A-Z Handbuch BasicMaker 2010