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