在Access查询中建立一个:字段含有的某个字符,距最后该字段出现过的行数 这个前提是ID要顺序e68a84e8a2ad3231313335323631343130323136353331333363376535不间断。123456789101112SELECT 表1.ID,表1.数值,IIf(InStr([数值],0)>;0,0,Nz(DLookUp(\"[0间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 0间隔行数,IIf(InStr([数值],1)>;0,0,Nz(DLookUp(\"[1间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 1间隔行数,IIf(InStr([数值],2)>;0,0,Nz(DLookUp(\"[2间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 2间隔行数,IIf(InStr([数值],3)>;0,0,Nz(DLookUp(\"[3间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 3间隔行数,IIf(InStr([数值],4)>;0,0,Nz(DLookUp(\"[4间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 4间隔行数,IIf(InStr([数值],5)>;0,0,Nz(DLookUp(\"[5间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 5间隔行数,IIf(InStr([数值],6)>;0,0,Nz(DLookUp(\"[6间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 6间隔行数,IIf(InStr([数值],7)>;0,0,Nz(DLookUp(\"[7间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 7间隔行数,IIf(InStr([数值],8)>;0,0,Nz(DLookUp(\"[8间隔行数]\",\"[查询1]\",\"[ID]=\"&([ID]-1)))+1)AS 8间隔行数,IIf(InStr([数值],9)>;0,0,Nz。
在Access中建立一个查询:字段含有的字符,距该字段最后出现间隔的行数 我原来程序 只需要小改一下就可以了至于 你前一个问题所说的搜索效率 问题,我在群里就有提前说过,你所需要的这种试试效率 会很低.如果可以保证 id 一定是连续不重复的,那可以改进一下下面的程序,但效率 也只是稍有提高,不会是根本 性的.要想从根本上解决问题,还得改变你的思路,就是不要使用即时 调用函数查询的方式,而是把字段值 预先算好.这种写的的函数跑一次也很快,跑完之后就可以立即显示 出来,'参数:SearchType'0 表示针对整个字段的值'>;0 表示针对第 SearchType 个字符'SearchLen,默认为1,表示 搜索一个字符,可以为1,2,3,.也可以为0,为0表示 针对 整个字符串搜索Public Function 间隔行数(TblName As String,FldName As String,ID As Long,Optional SearchType As Long=0,Optional SearchLen As Long=1)As Long'未进行错误处理以及参数检查Dim Result As LongDim lngID As LongDim rst As DAO.Recordset,strSql As StringDim strSearchValue As StringSet rst=CurrentDb.OpenRecordset(\"Select\"&FldName&\"From\"&TblName&\"Where ID=\"&CStr(ID),dbOpenForwardOnly,dbReadOnly)If rst.EOF ThenElsestrSearchValue=rst.Fields(0).ValueEnd If。
Access 报查询错误问题的处理方法 开发的Access系统在使用时报错如下:“您正准备执行删除查询,该查询将修改您表中的数据”。电脑 Access数据库 1 第一点,分析问题,是我们的增删改查语句被客户端记录,。