End Deyimi
Yürütme hemen sona erer.
End
Notlar
Koyabilirsiniz End tüm uygulamanın çalışmasını durdurmak için herhangi bir yere bir yordam deyiminde.Endile açılan tüm dosyaları kapatır bir Open deyimi ve uygulamanın tüm değişkenleri temizler.Uygulama nesnelerine başvurular tutan diğer program yok ve kendi kod hiçbiri çalıştığı hemen kapatır.
[!NOT]
End İfade, kod yürütülmesine aniden durur ve çağırmak değil Dispose veya Finalize yöntemi veya başka bir Visual Basic kodu.Diğer programlar tarafından tutulan nesne başvurularını geçersiz kılınır.Yoksa bir End deyimi içinde varıldığında bir Try veya Catch blok, denetim için ilgili geçirmiyor Finally blok.
Stop Deyimi askıya alır, ancak yürütme End, değil tüm dosyaları kapatın veya derlenmiş çalıştırılabilir (.exe) dosyasına karşılaştı sürece tüm değişkenleri temizlemek.
Çünkü End katılan olmadan uygulama sonlanýr açık olabilecek herhangi bir kaynağa yakın temiz bir şekilde kullanmadan önce aşağı denemelisiniz.Uygulamanızda herhangi bir form açmak varsa, örneğin, bunları önce Denetim indiğinde kapatmalısınız End ifadesi.
Kullanmanız gereken End tutumlu ve yalnızca gerektiğinde hemen durdurmak.Bir yordam sonlandırmak için normal yolları (Return Deyimi (Visual Basic) ve Exit Deyimi (Visual Basic)) yalnızca yordam temiz bir şekilde kapatmak ancak de çağıran kodun yakın temiz bir şekilde aşağı olanağını verirsiniz.Bir konsol uygulaması gibi basitçe yapabilirsiniz Return dan Main yordam.
.gif "Güvenlik Notu") Güvenlik Notu |
|---|
End Deyimi çağrıları Exit yöntemi, Environment , sınıf System ad.Exitsahip olmasını gerektirir UnmanagedCode izni.Aksi halde, varsa bir SecurityException hata oluşur. |
Ek bir anahtar tarafından izlenirse End <keyword> Deyimi (Visual Basic) uygun yordamı veya blok tanımının sonu belirlense.Örneğin, End Function tanımını sonlandırır bir Function yordam.
Örnek
Aşağıdaki örnek End kullanıcı isterse kod yürütülmesine sonlandırmak için deyimi.
Sub Form_Load()
Dim answer As MsgBoxResult
answer = MsgBox("Do you want to quit now?", MsgBoxStyle.YesNo)
If answer = MsgBoxResult.Yes Then
MsgBox("Terminating program")
End
End If
End Sub
Akıllı Aygıt Geliştirici notları
Bu ifade desteklenmiyor.