vb 链接数据库相关代码解释

Dim strSQL As String 定义了一个字符串变量,程序中用来存放查询字符串.

strSQL = "select 货号,条码,拼音编码,品名,规格," & _
"单位,产地,类别,进货价,销售价1,销售价2,最低售价 from 商品清单"
If Len(txbGoodPY.Text) <> 0 Then
strSQL = strSQL & " where 拼音编码 like '"
strSQL = strSQL & Trim(txbGoodPY.Text)
End If

这一段是完成对strSQL字符串的构造,使其成为一个完整的查询字符串.
like表示是模糊查询,即不是完整匹配,而是包含其后的关键字的结果.这里txbGoodPY.Text应该是要用户输入的查询关键字.
单引号是语法要求,不能写成""",双引号中间如果要用引号应该用单引号.

datPrimaryRS.RecordSource = strSQL
设置datPrimaryRS控件的记录数据源.
datPrimaryRS.Refresh 刷新控件数据显示,使新数据源数据得以正确显示.
datPrimaryRS应该是你的程序中用以显示查询结果的控件.

只有上面的代码程序好像不能正常运行吧.

datPrimaryRS是一个记录集，是adodb.recordset对象

Recordset 对象 (ADO)

Recordset 对象表示的是来自基本表或命令执行结果的记录全集。任何时候，Recordset 对象所指的当前记录均为集合内的单个记录。

说明

可使用 Recordset 对象操作来自提供者的数据。使用 ADO 时，通过 Recordset 对象可对几乎所有数据进行操作。所有 Recordset 对象均使用记录（行）和字段（列）进行构造。由于提供者所支持的功能不同，某些 Rec