Not: En güncel yardım içeriklerini, mümkün olduğunca hızlı biçimde kendi dilinizde size sunmak için çalışıyoruz. Bu sayfanın çevirisi otomasyon aracılığıyla yapılmıştır ve bu nedenle hatalı veya yanlış dil bilgisi kullanımları içerebilir. Amacımız, bu içeriğin sizin için faydalı olabilmesini sağlamaktır. Buradaki bilgilerin faydalı olup olmadığını bu sayfanın sonunda bize bildirebilir misiniz? Kolayca başvurabilmek için İngilizce makaleye buradan ulaşabilirsiniz.
Çeşitlemesini alt tür kullanıcı tarafından belirtilen bir hata numarası içeren hata verir.
Söz dizimi
CVErr ( HataNumarası )
Gerekli HataNumarasıbağımsız değişken herhangi bir geçerli hata numarasıdır.
Notlar
CVErr işlevi, kullanıcı tarafından oluşturulan yordamlarda kullanıcı tanımlı hataları oluşturmak için kullanın. Örneğin, birkaç bağımsız değişken kabul eder ve normal bir dize döndürür bir işlev oluşturursanız, kabul edilebilir aralıkta olduklarından emin olmak için giriş bağımsız değişkenleri değerlendir, işlevi olabilir. Değilseniz, sizin işlevi, beklediğiniz döndürmez olasıdır. Bu durumda, CVErr gerçekleştirilecek eylemi belirten bir hata numarası dönüş olanak tanır.
Örtük dönüştürme hatası verilmeyen dikkat edin. Örneğin, bir çeşitolmayan bir değişken için CVErr dönüş değerini doğrudan atayamazsınız. Bununla birlikte, açık bir dönüştürme (kullanarak CInt, CDblvb.) CVErr tarafından döndürülen değerinin gerçekleştirebilir ve uygun veri türübir değişkene atayabilir.
Örnek
Not: Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.
Bu örnekte, kimlerin VarTypevbError (10) olan bir değişken dönmek için CVErr işlevi kullanılmaktadır. Geçirilen bağımsız değişkeni bir sayı değilse CalculateDouble kullanıcı tanımlı işlev bir hata döndürür. Çalışma zamanı hata işleme erteleme veya kullanıcı tanımlı hataları kullanıcı tanımlı yordamlardan dönmek için CVErr kullanabilirsiniz. ISERROR işlevi hata değeri temsil ediyorsa sınamak için kullanın.
' Call CalculateDouble with an error-producing argument.
Sub Test()
Debug.Print CalculateDouble("345.45robert")
End Sub
' Define CalculateDouble Function procedure.
Function CalculateDouble(Number)
If IsNumeric(Number) Then
CalculateDouble = Number * 2 ' Return result.
Else
CalculateDouble = CVErr(2001) ' Return a user-defined error
End If ' number.
End Function