VB: Luk program

kan du ikke bare bruge

'End' ?

Hvor skal den indsættes?

Her er en funktion til at lukket et program:

  Function lukprogram(navnInfo)
  Dim Spm As Integer
  Spm = MsgBox("Vil du afslutte " & navnInfo & "", Title:="Afslut", buttons:=vbYesNo + vbQuestion)
  If Spm = 6 Then
  End
  End If
  End Function

Smid den ev. nederst i koden.

Når du så vil lukke. ex i en knap procedure skal du bare smide denne kode ind
lukprogram ("program navn")

Mange tak

det er altså beder at bruge Unload Form1.. End er det samme som CTRL+ALT+DEL det er ikke en god måde at lukke sit program på..

Private Sub Command1_Click()
  Unload Me
End Sub