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.

Write # (Anweisung)<br />

Write #Dateinummer, [Ausdruck]<br />

Schreibt Daten in eine Datei.<br />

Die Datei muss vorher mittels einer Open-Anweisung im Output- oder Append-Modus geöffnet worden sein.<br />

Dateinummer ist die in der Open-Anweisung vergebene Nummer für die Datei.<br />

Ausdruck enthält ein oder mehrere Ausgabeelemente.<br />

Wenn Ausdruck weggelassen wird, wird eine Leerzeile ausgegeben. Beachten Sie, dass in diesem Fall trotzdem ein<br />

Komma geschrieben werden muss.<br />

Siehe auch: Open, Seek, Print #<br />

Beispiel:<br />

Sub Main<br />

Open "TESTFILE" For Output As #1 ' Datei anlegen<br />

userData1$ = InputBox("Geben Sie eine Zeile Text ein.")<br />

userData2$ = InputBox("Geben Sie eine weitere Zeile ein.")<br />

Write #1, userData1, userData2 ' Daten schreiben<br />

Close #1<br />

Open "TESTFILE" for Input As #2<br />

Print "Inhalt der Datei:"<br />

Do While Not EOF(2)<br />

Line Input #2, FileData<br />

Print FileData<br />

Loop<br />

Close #2<br />

Kill "TESTFILE"<br />

' Datei öffnen<br />

' Zeile einlesen<br />

' Datei schließen<br />

' Datei löschen<br />

End Sub<br />

Year (Funktion)<br />

Year(Ausdruck)<br />

Liefert das Jahr des angegebenen Datums.<br />

Ausdruck ist ein numerischer oder Zeichenkettenausdruck, der ein Datum repräsentiert.<br />

Das Ergebnis ist eine ganze Zahl zwischen 100 und 9999.<br />

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

Beispiel:<br />

Sub Main<br />

T1 = Now<br />

' Now = aktuelles Datum + Uhrzeit<br />

End Sub<br />

MsgBox T1<br />

MsgBox "Tag: " & Day(T1)<br />

MsgBox "Monat: " & Month(T1)<br />

MsgBox "Jahr: " & Year(T1)<br />

MsgBox "Stunde: " & Hour(T1)<br />

MsgBox "Minute: " & Minute(T1)<br />

MsgBox "Sekunde: " & Second(T1)<br />

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

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

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!