VBスクリプト。 UFTツールで以下のコードを実行する必要があります

Question

私のコードは以下の通りです。外側の配列は各値を内側の配列と比較していません。外側の配列は内側の値と比較され、内側の値に移動します。

testdata = {25,27,81,104,33,34,56,78,99,84} 
testdata1 = {81,104} 

For i = 0 To UBound(testdata) - 1 

For j = 0 To UBound(testdata1) - 1 
    If testdata(i) = testdata1(j) Then 
     isFound = True 
     Call DB_Connectionwisdataflagupdation(sQuery,Para2,Para3,Para4,sValue) 
    'c=c+1 
    Exit for 
    End If 

     'isFound = True 


    isFound = False 
Next 
Next 

解決策を手伝ってください。

Answer 1

は、私は主にインデックスを調整し、あなたのコードにカップルマイナーな変更を加え、あなたのループの場合：

Dim i As Integer 
    Dim j As Integer 
    Dim isFound As Boolean 

    For i = LBound(testdata) To UBound(testdata) 
     For j = LBound(testdata1) To UBound(testdata1) 
      If testdata(i) = testdata1(j) Then 
      isFound = True 
      'Call DB_Connectionwisdataflagupdation(sQuery, Para2, Para3, Para4, sValue) 
      MsgBox testdata(i) 
      Exit For 
      End If 

      isFound = False 
     Next 
    Next