بر طرف کردن خطای Type Mismatvh

[ali.m.a]

با سلام
دوستان اشکال تکه کد زیر چیه که وقتی شرط برقرار نمیشه خطای Type Mismatch میده
Adodc1.RecordSource = "SELECT SUM (Ghest) As SumGhest FROM Tbl_Mah WHERE Perno=" & TmpPerNo & "AND VamID=" & Me.VamID & "AND Pardakht =1"
Adodc1.Refresh
Me.MGhVarizi.Caption = Adodc1.Recordset.Fields!SumGhest

[m.4.r.m]

نوع فیلد ها تو برام بگو اینا رو :
Perno
VamId
Pardakht