一個dbgrid的小問題...(編號：4734)

With DataFind
If Not .Recordset.RecordCount = 0 Then
For DBGridFind.Bookmark = 1 To .Recordset.RecordCount
　　　　DBGridFind.Columns("單位").Text = rs產品(IIf(.Recordset.Fields("單位"), "單位一", "單位二")).Value
　　　　Next
End If
End With
我想讓單位這一行的值如果是true就是單位一false就是單位二
可是如果不加上for...next他就只有第一行會改變
加上了卻又產生錯誤...該怎麼辦呢??