14.07.2014 Aufrufe

Handbuch BasicMaker 2010 - SoftMaker

Handbuch BasicMaker 2010 - SoftMaker

Handbuch BasicMaker 2010 - SoftMaker

MEHR ANZEIGEN
WENIGER ANZEIGEN

Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.

YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.

Print "Unterprogramm"<br />

Return<br />

End Sub<br />

Goto (Anweisung)<br />

Goto Label<br />

.<br />

.<br />

.<br />

Label:<br />

Anweisungen<br />

Unbedingter Sprung zum Sprungziel Label.<br />

Das Sprungziel Label muss sich innerhalb der gleichen Subroutine oder Funktion wie der Goto-Aufruf befinden.<br />

Hinweis: Diese Anweisung wird nur aus Kompatibilitätsgründen noch unterstützt. Der Gebrauch von Goto-<br />

Anweisungen macht den Programmcode schnell unübersichtlich. Sie sollten stattdessen die strukturierten Kontrollanweisungen<br />

(Do ... Loop, For ... Next, If ... Then ... Else, Select Case) verwenden.<br />

Siehe auch: Gosub ... Return, Sub, Abschnitt "Kontrollstrukturen"<br />

Beispiel:<br />

Sub Main<br />

Dim x<br />

For x = 1 to 5<br />

Print x<br />

If x > 3 Then<br />

Goto Label1<br />

End If<br />

Next x<br />

Label1:<br />

End Sub<br />

Print "Muss genügen!"<br />

Hex (Funktion)<br />

Hex(Num)<br />

Liefert eine Zeichenkette mit der hexadezimalen Darstellung der angegebenen Zahl.<br />

Num kann ein beliebiger numerischer Ausdruck sein; er wird auf die nächste ganze Zahl gerundet.<br />

Das Ergebnis kann maximal achtstellig werden.<br />

Siehe auch: Oct<br />

Beispiel:<br />

Sub Main<br />

Dim Msg As String, x%<br />

x% = 1024<br />

Msg =Str(x%) & " dezimal entspricht "<br />

Msg = Msg & Hex(x%) & " hexadezimal."<br />

MsgBox Msg<br />

End Sub<br />

<strong>Handbuch</strong> <strong>BasicMaker</strong> <strong>2010</strong> Anweisungen und Funktionen von A-Z 303

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!