admin 管理员组

文章数量: 1086019


2024年3月27日发(作者：tar压缩命令)

VB数据库编程技术

中SQL的实现

SQL中使用SELECT语句实现查询，SELECT语句基本上是数据库记录集的定义语句。

Data控件的RecordSource属性不—定是数据表名，可以是数据表中的某些行或多个数

据表中的数据组合。可以直接在Data控件的RecordSource属性栏中输入SQL，也可在

代码中通过SQL语句将选择的记录集赋给数据控件的RecordSource属性，也可赋予对象

变量。

例8 将例9.5中的查找功能改用SQL语句处理，显示某专业的学生记录。

使用SQL语句查询只要将例5中命令按钮Command5_Click事件写为如下代码：

Private Sub Command5_Click()

Dim mzy As String

mzy = InputBox$("请输入专业", "查找窗")

Source = "Select * From 基本情况 Where 专业 = '" & mzy & "'"

h

If Then

MsgBox "无此专业!", , "提示"

Source = "基本情况"

h

End If

End Sub

程序中“Select *”选择表中所有字段(也可以指定选择部分列)；“From基本情况”

短语指定数据来源；“Where 专业 = '" & mzy & "'"”短语构成查询条件，用于过滤表

中的记录；h方法激活这些变化。此时，若为True，

表示记录过滤后无数据，重新打开原来的基本情况表。

注意：代码中的两处Refresh语句不能合用为一句，这是因为在执行了Select命令后，

必须激活这些变化，然后才能判断记录集内有无数据。

也可用SQL语句实现模糊查询，命令按钮Command5_Click事件改为如下代码：

Private Sub Command5_Click()

Dim mzy As String

mzy = InputBox$("请输入专业", "查找窗")


本文标签： 语句 数据 查询 记录集 命令

版权声明：本文标题：VB数据库编程技术 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.roclinux.cn/p/1711542544a599133.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。