MsgBox su ListBox

Vorrei far apparire un messaggio di avviso al DblClick di una ListBox se 
essa contine un certo valore in uno dei campi (non quello associato).
Ho scritto così, ma mi da errore "Tipo non corrispondente"

Private Sub ListBox_DblClick(Cancel As Integer)
If  Me.ListBox!Campo = 2  Then

MsgBox "....."
Else
Exit Sub
Dove sbaglio ?
Marco