CVErr İşlevi

Önemli : Bu makale makine çevisidir. Bkz. yasal uyarı. Bu makalenin İngilizce sürümüne 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

Not : Makine Çevirisi Yasal Uyarısı: Bu makale, insan müdahalesi olmadan bir bilgisayar sistemi tarafından çevrilmiştir. Microsoft bu makine çevirilerini İngilizce bilmeyen kullanıcıların Microsoft ürünleri, hizmetleri ve teknolojileriyle ilgili içeriklerden yararlanmasına yardımcı olmak için sunar. Bu makale makine çevirisi olduğundan sözcük, cümle dizilimi ve gramer hataları içerebilir.

Yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Office Insider Programına Katılın

Bu bilgi yararlı oldu mu?

Görüşleriniz için teşekkür ederiz!

Geri bildiriminiz için teşekkürler! Office destek temsilcilerimizden biriyle görüşmeniz yararlı olabilir.

×