Forループを続ける条件

Question

最初にVB.netでプログラミングを行い、少し問題を見つけました。私は、ループforが実行されるかどうかを別の反復を行う前に、Ifステートメント制御で制御する方法を見つけようとしています。

コード：

For Each theTable In tableDoc.Tables 
     testString = "" 
     For row = 1 To theTable.Rows.Count 
      isHeaderOrNot = theTable.Cell(row, 1).Range.Text 'Gets value in first column 
      If isHeaderOrNot is Not Like "Section" or "Field" then Continue For 'if the words "Section" or "Field" are NOT included in isHeaderOrNot then continue with For loop 
      keyText = theTable.Cell(row, 2).Range.Text 
      valueText = theTable.Cell(row, 3).Range.Text 
      Console.WriteLine("KEY: {0}", keyText) 
      Console.WriteLine("VALUE: {0}", valueText) 
      Console.WriteLine("") 
     Next 
    Next 

私は期待表現がありますと言ってLike上のエラーを取得しています。..

は基本的にループの中にある行の最初の列は、セクションまたはフィールドIが含まれている場合次の行に行きたい。初めてこれを扱う質問を説明しようとしたので、何か質問してみてください！本当にありがとう！

Answer 1

ブロック全体をifに含めることができます。そうでない場合にループを終了する場合は、Exit Forを使用できます。

For Each theTable In tableDoc.Tables 
    testString = "" 
    For row = 1 To theTable.Rows.Count 
     isHeaderOrNot = theTable.Cell(row, 1).Range.Text 

     'If cell doesn't contain Section or Field, then do the following 
     If Not isHeaderOrNot.contains("Section") AndAlso Not isHeaderOrNot.contains("Field") 
      keyText = theTable.Cell(row, 2).Range.Text 
      valueText = theTable.Cell(row, 3).Range.Text 
      Console.WriteLine("KEY: {0}", keyText) 
      Console.WriteLine("VALUE: {0}", valueText) 
      Console.WriteLine("") 
     Else 

      'If it DOES include Section or Field, then stop looping 
      Exit For 
     End If 
    Next 
Next 

Answer 2

正しい構文は、あなたが必要とする

If Not isHeaderOrNot Like "Section" AndAlso 
    Not isHeaderOrNot Like "Field" Then 
    Exit For