AND

L'operatore And dà un risultato vero, soltanto se entrambe le variabili sono "vere".

Mostriamo un esempio pratico:

Public Sub Main()
 
 Dim a, b As Byte
 
  a = 1
  b = 0
   
  If (a = 0) And (b = 1) Then Print "1"
  If (a = 0) And (b = 0) Then Print "2"
  If (a = 1) And (b = 1) Then Print "3"
  If (a = 1) And (b = 0) Then Print "4"
  
End

Come si potrà notare, andrà a buon fine, restituendo il valore logico alto (1), soltanto il 4° test logico, poiché solo in questo caso entrambe le variabili sono vere.