答１
　For Each fldWk In rs.Fields
　　If fldWk.Name = "hogege" Then
　　　Msgbox "I't so cool!!"
　　　Exit For
　　End If
　Next

答２
　基本設計を見なおせ