<quote>Hej Alle
Hvordan kan man lukke en applikation ned automatisk efter at man Eksembelvis har fået udfyldt
en tekstbox "Text4". Jeg har brugt kommandoen "Unload Me" dette virker fint i udvikls miljøet men virker ikke når man lave den om til en exe fil og kører denne.
MIT EKSEMBEL
Private Sub Form_Paint()
Data1.Recordset.AddNew
Text4= Command()
End Sub
Private Sub Text4_Change()
Text1 = Text4
Text2 = Date()
Text3 = Time
Unload Me
End Sub
</quote>
<b> Det gøres ganske simpelt ved at skrive: "END" -> uden gåseøjnene, så koden kommer nogenlunde til at se sådan ud: </b>
'***** KODE START *****
Private Sub Form_Paint()
Data1.Recordset.AddNew
Text4= Command()
End Sub
Private Sub Text4_Change()
Text1 = Text4
Text2 = Date()
Text3 = Time
<b>End</b>
End Sub
'***** KODE SLUT *****
<b> Koden "END" bevirker at applikationen lukker helt. </b>
God fornøjelse!
Mvh.
Lars Haslev
;-)[Redigeret d. 11/02-02 15:41:06 af Lars Haslev]