14.07.2014 Aufrufe

Handbuch BasicMaker 2010 - SoftMaker

Handbuch BasicMaker 2010 - SoftMaker

Handbuch BasicMaker 2010 - SoftMaker

MEHR ANZEIGEN
WENIGER ANZEIGEN

Erfolgreiche ePaper selbst erstellen

Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.

Titel = "Berechnung der Quadratwurzel"<br />

Prompt = "Geben Sie eine positive Zahl ein:"<br />

Zahl = InputBox(Prompt, Titel)<br />

If Zahl < 0 Then<br />

Msg = "Die Wurzel von negativen Zahlen ist nicht definiert."<br />

Else<br />

Msg = "Die Wurzel von " & Zahl & " beträgt "<br />

Msg = Msg & Sqr(Zahl) & "."<br />

End If<br />

MsgBox Msg<br />

End Sub<br />

Static (Anweisung)<br />

Static Variable<br />

Legt Speicherplatz für eine Variable an und bestimmt deren Datentyp.<br />

Im Unterschied zu Variablen, die mit Dim angelegt werden, behalten Static-Variablen ihren Wert während des gesamten<br />

Programmlaufs, auch wenn sie innerhalb einer Funktion deklariert worden sind.<br />

Siehe auch: Dim, Function, Sub<br />

Beispiel:<br />

' Dieses Beispiel zeigt den Gebrauch von Static, um den Wert der<br />

' Variablen i in der Prozedur Joe zu erhalten.<br />

Sub Main<br />

For i = 1 to 2<br />

Joe 2<br />

Next i<br />

End Sub<br />

Sub Joe(j As Integer)<br />

Static i<br />

Print i<br />

i = i + 5<br />

Print i<br />

End Sub<br />

Stop (Anweisung)<br />

Stop<br />

Beendet die Ausführung des Scripts sofort.<br />

Siehe auch: End<br />

Beispiel:<br />

Sub Main<br />

Dim x, y, z<br />

For x = 1 to 3<br />

For y = 1 to 3<br />

For z = 1 to 3<br />

Print z, y, x<br />

Next z<br />

Next y<br />

Stop<br />

Next x<br />

End Sub<br />

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

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

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!