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.

IDRETRY 4 Wiederholen-Schaltfläche<br />

IDIGNORE 5 Ignorieren-Schaltfläche<br />

IDYES 6 Ja-Schaltfläche<br />

IDNO 7 Nein-Schaltfläche<br />

Beispiel:<br />

Dieses Beispiel benutzt MsgBox, um eine Sicherheitsabfrage anzuzeigen.<br />

Sub Main<br />

Dim DgDef, Msg, Response, Title<br />

Title = "MsgBox-Beispiel"<br />

Msg = "Möchten Sie fortfahren?"<br />

DgDef = MB_YESNOCANCEL + MB_ICONQUESTION + MB_DEFBUTTON3<br />

End Sub<br />

Response = MsgBox(Msg, DgDef, Title)<br />

If Response = IDYES Then<br />

Msg = "Sie haben Ja gewählt."<br />

ElseIf Response = IDCANCEL Then<br />

Msg = "Sie haben Abbrechen gewählt."<br />

Else<br />

Msg = "Sie haben Nein gewählt."<br />

End If<br />

MsgBox Msg<br />

Name (Anweisung)<br />

Name AlterName As NeuerName<br />

Benennt die Datei AlterName in NeuerName um.<br />

Jeder der beiden Parameter muss eine einzelne Datei bezeichnen. Platzhalter wie "*" und "?" sind nicht erlaubt.<br />

Siehe auch: ChDir, Kill<br />

Beispiel:<br />

Sub Main<br />

Name "testfile" As "newtest"<br />

End Sub<br />

Now (Funktion)<br />

Now[()]<br />

Ermittelt die aktuelle Systemzeit (Datum und Uhrzeit).<br />

Die Now-Funktion liefert ein Ergebnis vom Typ Variant, das Datum und Uhrzeit enthält. Die Vorkommastellen repräsentieren<br />

das Datum, die Nachkommastellen die Zeit.<br />

Siehe auch: Date, Day, Hour, Minute, Month, Second, Time, Weekday, Year<br />

Beispiel:<br />

Sub Main<br />

T1 = Now<br />

' Now = aktuelles Datum + Uhrzeit<br />

MsgBox T1<br />

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

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

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!