2024年6月21日发(作者：)
在VB＋Access系统中实现多项条件查询
在VB＋Access系统中实现多项条件查询 (上)
摘 要 本文以“人事档案”数据库为例，介绍在VB＋ Access系
统中实现单项条件查询与多项条件查询的程序设计方法。
关键词 数据库 查询 VB Access 事件代码
一、前言
对数据库信息进行查询检索是数据库管理软件的主要功能之一，
也是其难点之一。本文以“人事档案”数据库为例，在Visual Basic
6.0+Sp3及Microsoft Access2000环境下，介绍在VB＋ Access系
统中实现单项条件查询与多项条件查询的程序设计方法。
二、字段及公共变量
假设“人事档案”数据库已经生成（位于当前路径
下），库中有 “人事档案”表，表中有12条记录。为简化说明，假设
表中仅有如下几个字段： [姓名]TEXT(4)，[性别]TEXT(1)，[籍
贯]TEXT(8)，[出生年月]DATE，[政治面貌]TEXT(8)，[文化程
度]TEXT(8)。
其中“性别、政治面貌、文化程度”三个字段的值只能从列表中
选择，以下简称“下拉列表字段”，“性别”的列表值有“男、女”
两项；“政治面貌”的列表值有“中共党员、共青团员、民主党员、
群众”四项；“文化程度”的列表值有“本科以上、大学本科、大学
专科、专科以下”四项。
另外，在模块（Modbas）中定义公共变量如下：
Public QueryStr As String '查询条件串
Public ConditionNo As Integer '条件数
Public CombOrText As Boolean '选择了Combo项还是Text
项（即是否选择了下拉列表字段）
Public Combo(3) As String '下拉列表字段数组，若增加下
拉列表字段数，则增加此数组维数
三、查询主窗体
本查询程序示例包含三个窗体：查询主窗体（FrmQuery）、单
项条件查询窗体（FrmSingle）、多项条件查询窗体（FrmMany）。
其中查询主窗体（图一）上有如下几类控件：
1、三个文本框Text1(1)、Text1(2)、Text1(3)分别显示姓名、籍
贯、出生年月等字段的值；
2、三个下拉列表框Combo1(1)、Combo1(2)、Combo1(3) 分
别显示性别、政治面貌、文化程度等字段的值；
3、RichTextBox1控件用于显示个人简历；
4、Data1控件的数据库连接方式（Connect）采用VB系统默认
的Access 2000（视Microsoft Office版本而定）。可分别在Data1
控件的DatabaseName、RecordSource属性中设置Data1所关联的
数据库文件名及数据表名，亦可在主窗体的Form_Load中加入如下代
码：
Private Sub Form_Load()
发布者：admin，转转请注明出处：http://www.yc00.com/news/1718902653a2753421.html
评论列表（0条）