Excel的VBA功能一样不工作

Question

我vba使用此指令：

str1 = Sheet1.Cells(2, 9) 
    str2 = Sheet1.Cells(2, 10) 

    cell(2,9)="توابع تبریز" 
    cell(2,10)="تبریز" 

，我写这样的代码：

if trim(str1) like "*"+trim(str2) then 
msgbox "ok" 
end if 

但如果块没有工作，像函数返回错误结果。

但是，当我写这篇文章的代码：

a="توابع تبریز " like "*"+"تبریز" 

但现在返回True！发生什么事？

Answer 1

的+操作是没有问题的。虽然建议使用&而不是+

我猜这个语言是乌尔都语。如果是的话，我只记得它是从左到右书写的。因此，在这种情况下，试试这个

If str1 Like "*" & str2 Then 'Remove the trim 

你，因为它是微调的空间，因此外卡不能正常使用去除装饰。看下面的例子。

例

Sub Sample() 
    '~~> Trying to imitate Urdu in reverse 
    Cells(2, 9) = " aaaa bbbb " 
    Cells(2, 10) = " bbbb " 

    str1 = Cells(2, 9) 
    str2 = Cells(2, 10) 

    If str1 Like "*" & str2 Then MsgBox "Hey" 
End Sub 

Answer 2

你没有正确连接字符串。您目前使用的是数学运算符+。更换你+与&像这样：

If Trim(str1) Like "*" & Trim(str2) Then