Bỏ qua để tới nội dung chính
Đăng nhập với Microsoft
Đăng nhập hoặc tạo một tài khoản.
Xin chào,
Chọn một tài khoản khác.
Bạn có nhiều tài khoản
Chọn tài khoản bạn muốn đăng nhập.

Trả về một Biến_thể của kiểu con Lỗi chứa số lỗi xác định bởi người dùng.

Cú pháp

CVErr ( errornumber )

Số lỗi bắt buộc làtham đối số lỗi hợp lệ.

Chú thích

Sử dụng hàm CVErr để tạo lỗi do người dùng xác định trong thủ tục do người dùng tạo. Ví dụ, nếu bạn tạo hàm chấp nhận một vài tham đối và thường trả về một chuỗi, bạn có thể để hàm của mình đánh giá các tham đối đầu vào để đảm bảo chúng nằm trong phạm vi có thể chấp nhận được. Nếu không, có khả năng hàm của bạn sẽ không trả về kết quả mong đợi. Trong trường hợp này, CVErr cho phép bạn trả về số lỗi cho bạn biết cần thực hiện hành động nào.

Lưu ý rằng chuyển đổi ngầm của lỗi không được cho phép. Ví dụ: bạn không thể trực tiếp gán giá trị trả về của CVErr cho một giá biến số không phải là Một Biến _thể. Tuy nhiên, bạn có thể thực hiện chuyển đổi rõ ràng (sử dụng CInt, CDbl, v.v.) của giá trị do CVErr trả về và gán giá trị đó cho một biến của các giá trị kiểu dữ liệu.

Ví dụ

Lưu ý: Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.

Ví dụ này sử dụng hàm CVErr để trả về một Biến _thể có VarTypevbError (10). Hàm do người dùng xác CalculateDouble trả về lỗi nếu tham đối được chuyển đến đó không phải là số. Bạn có thể sử dụng CVErr để trả về lỗi do người dùng xác định từ thủ tục do người dùng xác định hoặc để trì hoãn xử lý lỗi thời gian chạy. Dùng hàm IsError để kiểm tra xem giá trị có đại diện cho lỗi không.

' 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

Bạn cần thêm trợ giúp?

Bạn muốn xem các tùy chọn khác?

Khám phá các lợi ích của gói đăng ký, xem qua các khóa đào tạo, tìm hiểu cách bảo mật thiết bị của bạn và hơn thế nữa.

Cộng đồng giúp bạn đặt và trả lời các câu hỏi, cung cấp phản hồi và lắng nghe ý kiến từ các chuyên gia có kiến thức phong phú.

Thông tin này có hữu ích không?

Bạn hài lòng đến đâu với chất lượng dịch thuật?
Điều gì ảnh hưởng đến trải nghiệm của bạn?
Khi nhấn gửi, phản hồi của bạn sẽ được sử dụng để cải thiện các sản phẩm và dịch vụ của Microsoft. Người quản trị CNTT của bạn sẽ có thể thu thập dữ liệu này. Điều khoản về quyền riêng tư.

Cảm ơn phản hồi của bạn!

×