VBA - Sử dụng toán tử Like với Chọn Case
VBA - Sử dụng toán tử Like với Chọn Case
Giới thiệu
Trong các trường hợp thông thường, câu lệnh Chọn trường hợp không hoạt động với toán tử Like . Trong bài viết này, bạn sẽ tìm hiểu cách khắc phục giới hạn này (If, Else If, ...)Chọn Case & Like - Kiểm tra
Đoạn mã sau chứng minh rằng Chọn Case không hoạt động với toán tử Like:Sub Chọn_Case_Like () word = "KAKAO" Chọn Case word Case mot Like "* K * K *" MsgBox "Good" Case Else MsgBox "Không tốt" End Chọn End Sub
Dù nội dung của biến từ là gì, nó sẽ luôn trả về "không tốt" ...
Sử dụng biểu thức True -Test
Để sử dụng toán tử Like trong Chọn trường hợp, bạn sẽ cần thêm biểu thức True.Chọn phụ K * "MsgBox" Tốt "Trường hợp khác MsgBox" Không tốt "Kết thúc Chọn Kết thúc phụ
Hàm Boolean hữu ích
Chức năng
Hàm Case_True_Like (word As String) As Boolean Chọn Case True Case Case Like "* K * K *" Case_True_Like = True Case Else Case_True_Like = false End Chọn End Function
Gọi hàm
Kiểm tra phụ () MsgBox Case_True_Like ("KAKAO") Kết thúc Sub