IF y AND

[fpoccard]

Buenas, ante todo perdon por la pregunta, supongo que es muy basica
tengo el siguiente codigo que es parte de una funcion que convierte numeros decimales a numeroS hexa.
No entiendo como funciona el "If lngNum And 2 ^ i then" ya que cuando por ejemplo i es = 2 la condicion es falsa y cuando i vale 1 la condicion es verdadera, al igual que cuando vale 0.
(NumBits vale 8)(numero para convertir a hexa)
Muchas gracias

Dim i As Integer
Dim lngNum As Long
Dim sTmp As String
Dim c As Byte

lngNum = Val(sNumDec)
sTmp = ""
sTmp = ""
For i = NumBits - 1 To 0 Step -1
If lngNum And 2 ^ i Then
sTmp = sTmp & "1"
Else
sTmp = sTmp & "0"
End If
Next