* وظيفة LIKE
تستخدم لمقارنة النصوص مع نمط (Pattern) معيّن.
النمط يحتوي على رموز خاصة (Wildcards) تسمح بالبحث الجزئي أو المرن داخل النصوص.
* أمثلة عملية في VBA
Dim txt As String
txt = "Mahdi"
' مثال 1: البحث عن نص يبدأ بـ "M"
If txt Like "M*" Then
MsgBox "يبدأ بحرف M"
End If
' مثال 2: نص مكون من 5 أحرف بالضبط
If txt Like "?????" Then
MsgBox "النص يحتوي على 5 أحرف"
End If
' مثال 3: نص ينتهي بـ "di"
If txt Like "*di" Then
MsgBox "ينتهي بـ di"
End If
' مثال 4: نص يحتوي على رقمين متتاليين
Dim code As String
code = "AB12"
If code Like "*##" Then
MsgBox "ينتهي برقمين"
End If