Visual Basic надо изучать, а конкретно его выражения. Например, 
IIF(A=B) Then
   DoCmd.OpenTable "Таблица1"
Else
   DoCmd.OpenTable "Таблица2"
End If