Erstellen eines ActiveX-Element

Neues Projekt erstellen

Elemente auf die Form setzen

Den Programmcode auf den Knopf Speichern schreiben

Private Sub cmdSpeichern_Click()

'Deklarieren der Variabeln
Dim vKanal As Byte
Dim vText As String

' Freier Kanal finden
vKanal = FreeFile

'Ausgabedatei für Anfügen öffnen
Open "C:\Tagebuch.txt" For Append As #vKanal

'Daten via Kanal in die Datei schreiben (Kommagetrennt)
Write #vKanal, TxDatum, TxEintrag

'Offene Datei schliessen
Close vKanal

'Text für Kontrollmeldung zusammenbauen
vText = "Datum: " & TxDatum & Chr$(13) & "Eintrag: " & TxEintrag

'Ausgabe der Kontrollmeldung
MsgBox vText, vbInformation, "Es wurden folgende Daten geschrieben"

'Felder auf Formular leeren
TxDatum = ""
TxEintrag = ""

End Sub


Speichern des Projektes

Projektdatei speichern
Document speichern
Exe-Datei erstellen

Kompilat erzeugen mit dem Installationsassistent

Speicherort des Kompilates festlegen

Das Ergebnis auf der Festplatte