如何用代码筛选结果不等于0的记录.

liuweisunjing

建了一个窗体,用一个查询做数据源,请教,如何用代码控制只显示 [结存] <>0 的数据.查询本身不加条件,用代码控制.多谢了.

Victor_Duane

可用窗体的筛选

liuweisunjing

Dim strWhere As String
    strWhere = ""   
    If Not IsNull(Me.所属一级) Then
   strWhere = strWhere & "([所属一级] like '*" & Me.所属一级 & "*')
    End If
     Me.库存查询子窗体.Form.Filter = strWhere
     Me.库存查询子窗体.Form.FilterOn = True
用这段代码可以实现 在窗体上有控件显示条件的筛选.
请版主再具体点说好吗?用窗体的筛选,该怎么写代码啊??多谢了.

liuweisunjing

Dim strWhere As String
    strWhere = ""   
    If Not IsNull(Me.所属一级) Then
   strWhere = strWhere & "([所属一级] like '*" & Me.所属一级 & "*')
    End If
     Me.库存查询子窗体.Form.Filter = strWhere
     Me.库存查询子窗体.Form.FilterOn = True
用这段代码可以实现 在窗体上有控件显示条件的筛选.
请版主再具体点说好吗?用窗体的筛选,该怎么写代码啊??多谢了.

Victor_Duane

你不是已经实现了吗
你还可以在窗体加载的时候用SQL语句给查询加条件,
比如me.recordsource="select * from 查询名 where [结存] <>0 "

liuweisunjing

刚才实现筛选,只是在窗体用文本框设置条件,我想问像这种窗体上没有控件控制条件的该如何实现.现在用您的方法已经可以了.多谢版主.