End

　　這函數是用來強制關閉程式，例如我現在開了一個程式有三張表單，在其中一張表單輸入：

Private Sub Command1_Click()
　End
End Sub

　　這樣，這個程式就會全部關閉。