Aracılığıyla paylaş

End Deyimi

Yürütmeyi hemen sonlandırır.

Sözdizimi

End

Açıklamalar

Tüm uygulamanın çalışmayı durdurmasını End zorlamak için deyimini bir yordamda herhangi bir yere yerleştirebilirsiniz. End deyimiyle Open açılan tüm dosyaları kapatır ve uygulamanın tüm değişkenlerini temizler. Uygulama, nesnelerine başvurular tutan başka bir program olmadığı ve kodunun hiçbiri çalışmadiği anda kapanır.

Uyarı

deyimiEnd, kod yürütmeyi aniden durdurur ve veya Finalize yöntemini ya da başka bir Visual Basic kodunu çağırmazDispose. Diğer programlar tarafından tutulan nesne başvuruları geçersiz kılındı. Bir veya Catch bloğunda Try bir End deyimle karşılaşılırsa, denetim ilgili Finally bloğa geçmez.

Stop deyimi yürütmeyi askıya alır, ancak aksineEnd, derlenmiş yürütülebilir dosyada (.exe) karşılaşılmadığı sürece hiçbir dosyayı kapatmaz veya değişkenleri temizlemez.

End Açık olabilecek kaynaklara katılmadan uygulamanızı sonlandırdığından, kullanmadan önce temiz bir şekilde kapatmayı denemelisiniz. Örneğin, uygulamanızın açık formları varsa, denetim deyimine End ulaşmadan önce bunları kapatmanız gerekir.

Tedbirli ve yalnızca hemen durmanız gerektiğinde kullanmanız End gerekir. Bir yordamı sonlandırmanın normal yolları (Return Deyimi ve Çıkış Deyimi) yalnızca yordamı temiz bir şekilde kapatmakla kalmaz, aynı zamanda çağıran kodu temiz bir şekilde kapatma fırsatı verir. Örneğin, bir konsol uygulaması yalnızca Return yordamdan Main alabilir.

Önemli

deyimiEnd, ad alanında System sınıfının yöntemini Environment çağırırExit. Exit izniniz olmasını UnmanagedCode gerektirir. Aksi takdirde bir SecurityException hata oluşur.

Ardından ek bir anahtar sözcük geldiğinde End <anahtar sözcüğü> Deyimi , uygun yordamın veya bloğun tanımının sonunu gösterir. Örneğin, End Function bir Function yordamın tanımını sonlandırır.

Örnek

Aşağıdaki örnek, kullanıcı isterse kod yürütmeyi sonlandırmak için deyimini kullanır End .

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ı Cihaz Geliştirici Notları

Bu deyim desteklenmez.

Ayrıca bakınız

  • Last updated on