VBScript

[rfbdoc]

Frage an VB Script Kenner
Ich möchte über ein selbsterstelltes TurboMed Formular einen Texteintrag in der Kartei anlegen, hier beispielhaft den Texteintrag "Meine Impfung" unter der Artspalte i
Das funktioniert über den u.a. Textcode, wobei der Eintrag unter dem aktuellen Tagesdatum erstellt wird.

'------------ Schliessen -------------
Sub Form_QueryClose( ByVal Cancel )
dim strKK_Eintrag
Set strKK_Eintrag = Behandlungsfall.Karteikarte.NeuerTextEintrag ("i","Meine Impfung")
End sub
'---------------------------------------

Mein Vorhaben: Es wird im VB Script ein anderes Datum abgefragt, und der Texteintrag "Meine Impfung" soll unter eben diesem Datum in der Kartei eingetragen werden. Wie lautet dazu die entsprechende VBScript Syntax ?