Private Sub query_btn_Click()
querycondition = querycon()
queryresult.Form.FilterOn = False
queryresult.Requery
If Trim(querycondition) <> "" Then
queryresult.Form.Filter = querycondition
queryresult.Form.FilterOn = True
End If
End Sub
其中querycon用于生成查询(筛选)条件,并返回
queryresult.Form.FilterOn表示筛选器的开关
queryresult.Form.Filter表示筛选器的条件
querycon的大致语句如下:
strcondition = ""
If Trim(序号) <> "" Then
If Trim(strcondition) <> "" Then
strcondition = strcondition & " and "
End If
strcondition = strcondition & "序号=" & 序号
End If
If Trim(名称) <> "" Then
If Trim(strcondition) <> "" Then
strcondition = strcondition & " and "
End If
strcondition = strcondition & "名称 like '*" & 名称 & "*'"
End If
If Trim(代码) <> "" Then
If Trim(strcondition) <> "" Then
strcondition = strcondition & " and "
End If
strcondition = strcondition & "代码 ='" & 管理代码 & "'"
End If
If Trim(科室名称) <> "" Then
If Trim(strcondition) <> "" Then
strcondition = strcondition & " and "
End If
strcondition = strcondition & "科室名称 like '*" & 科室名称 & "*'"
End If
If Trim(姓名) <> "" Then
If Trim(strcondition) <> "" Then
strcondition = strcondition & " and "
End If
strcondition = strcondition & "姓名 like '*" & 姓名 & "*'"
End If
If Trim(地址) <> "" Then
If Trim(strcondition) <> "" Then
strcondition = strcondition & " and "
End If
strcondition = strcondition & "地址 like '*" & 地址 & "*'"
End If
querycon = strcondition
根据以上代码 可制作以下窗体,实现access的多参数查询
- 大小: 58.8 KB
分享到:
相关推荐
10.2.4 在子窗体中使用SQL的UNION语句查询所有记录 266 10.2.5 在组合框控件外显示组合框的列 268 10.2.6 根据用户的输入添加新的组合框选项 271 10.3 使用本机的Access选项卡控件 273 10.3.1 本机的选项卡...
6-2-2 按窗体筛选数据 6-2-3 使用或条件的筛选 6-2-4 修改. 取消. 删除筛选条件 6-3 基本查询技巧 6-3-1 什么是查询 6-3-2 用简单查询向导产生查询 6-3-3 用设计视图建立查询 6-3-4 修改查询条件 6-3-5 在...
1246.2.3 在多个字段上排序数据 1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和...
1246.2.3 在多个字段上排序数据 1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和...
1246.2.3 在多个字段上排序数据 1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1246.2.3 在多个字段上排序数据 1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和...
10.2.4 在子窗体中使用SQL的UNION语句查询所有记录 266 10.2.5 在组合框控件外显示组合框的列 268 10.2.6 根据用户的输入添加新的组合框选项 271 10.3 使用本机的Access选项卡控件 273 10.3.1 本机的选项卡控件...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
1256.2.4 删除表排序次序和解冻列 1256.3 查找表中的匹配记录 1266.4 自动地替换匹配的字段值 1276.5 筛选表数据 1286.5.1 按选定内容筛选 1286.5.2 按窗体筛选 1306.5.3 高级筛选和排序 1326.5.4 添加一个多字段...
01064获取Excel窗体工具栏信息 01065获取Excel外部数据工具栏信息 01066获取Excel公式审核工具栏信息 01067获取Excel控件工具箱工具栏信息 01068获取Excel绘图工具栏信息 01069获取Excel命令按钮的外观图像和FaceID...
6-2-2 按窗体筛选数据 6-2-3 使用或条件的筛选 6-2-4 修改. 取消. 删除筛选条件 6-3 基本查询技巧 6-3-1 什么是查询 6-3-2 用简单查询向导产生查询 6-3-3 用设计视图建立查询 6-3-4 修改查询条件 6-3-5 在...
四、窗体的基本操作 1、 窗体分类: (1) 纵栏式窗体 (2) 表格式窗体 (3) 主/子窗体 (4) 数据表窗体 (5) 图表窗体 (6) 数据透视表窗体 2、 创建窗体: (1) 使用向导创建窗体。 (2) 使用设计器创建...