ifステートメントの複数の条件を読み取って閉じた

Question

すべてのステートメントを作成しようとしていますが、プログラムは各条件を読み取る必要があります。これは私が何らかの形でそれを実現した間違いです。なぜなら私はもちろん、それが各条件を通過しないからです。しかし、イム立ち往生、私はこの問題

'I want to state two condition (A) and (B) thats why I am using IF and 
'ELSE. but inside (B) i want to pass through first, second, and third 
'condition 

    '(A) 

    If tmpRS2.EOF Then 
     tmpRS2.AddNew 
     tmpRS2.Fields("ADPS_CD").Value = KOM_04 
     tmpRS2.Fields("ADPS_NAME").Value = KOM_14 & KOM_05 & KOM_06 
     tmpRS2.Update 
     YC = YC + 1 

    ' (B) The problem starts here ---->    

    Else 'it will not go through each one of the condition, 

      'first condition 

     If KOM_14 & KOM_05 & KOM_06 <> tmpRS2.Fields("ADPS_NAME").Value Then 
      tmpRS2.DbEdit 
      tmpRS2.Fields("ADPS_NAME").Value = KOM_14 & KOM_05 & KOM_06 
      tmpRS2.Update 
      UC = UC + 1 

     Else 
      'second condition 

      If KOM_14 & KOM_05 & KOM_06 <> tmpRS2.Fields("SCT_NAME").Value Then 
       tmpRS2.DbEdit 
       tmpRS2.Fields("SCT_NAME").Value = KOM_14 & KOM_05 & KOM_06 
       tmpRS2.Update 
       UC = UC + 1 
      Else 

        'third condition 

        If KOM_14 & KOM_05 & KOM_06 <> tmpRS2.Fields("DIV_NAME").Value Then 
         tmpRS2.DbEdit 
         tmpRS2.Fields("DIV_NAME").Value = KOM_14 & KOM_05 & KOM_06 
         tmpRS2.Update 
         UC = UC + 1 
        End If 
     End If 

    End If 

Answer 1

使用のElseIfを解決する方法がわからないので：

If tmpRS2.EOF Then 
     '..... 
ElseIf KOM_14 & KOM_05 & KOM_06 <> tmpRS2.Fields("ADPS_NAME").Value Then 
     '..... 
ElseIf KOM_14 & KOM_05 & KOM_06 <> tmpRS2.Fields("SCT_NAME").Value Then 
     '..... 
ElseIf KOM_14 & KOM_05 & KOM_06 <> tmpRS2.Fields("DIV_NAME").Value Then 
     '..... 
End If