求助:VB中用data控件执行SQL语句例子

发布网友发布时间：2024-10-24 13:06

共2个回答

热心网友时间：2024-10-24 20:53

请将数据库路径及名称改为你自己的数据库据库路径及名称。将Text1的属性页的属性DataSource设置Data1，属性DataField设写为性别。将SQL语句的表名改为你的数据表名。代码如下：

Option Explicit
Dim sql As String

Private Sub Form_Load()
sql = "select * from b1 Where 性别 Like'" & Text1 & "%'"
Data1.DatabaseName = "D:\Program Files\Microsoft Visual Studio\VB98\管理系统.mdb"
Data1.RecordSource = sql
End Sub

热心网友时间：2024-10-24 20:52

Data1.RecordSource = "select * from 图书基本信息表 where TSBH like '*" & Text1.Text & "*'"

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com

首页

文章

求助:VB中用data控件执行SQL语句例子