标题: For Each fld In rs.Fields --出错信息：类型不匹配。（如何解决） [打印本页] 作者: octopus 时间: 2004-9-14 18:53 标题: For Each fld In rs.Fields --出错信息：类型不匹配。（如何解决） Function BlnField(sTblName As String, sFldName As String) As Boolean
Dim fld As Field
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset(sTblName)
rs.Fields.Refresh
For Each fld In rs.Fields --出错信息：类型不匹配。（如何解决）
......
Next
End Function作者: 方漠 时间: 2004-9-15 06:52
Function BlnField(sTblName As String, sFldName As String) As Boolean