SQL = "select Name fom 1 Whee Name Like"" & Text1 & "%" ode y

name"

以上是實現模糊查詢的SQL語句,是從表名1查詢Name欄位的.

在VB6中可用ADO及DATAGRID控制元件，用如下語句可更靈活：

Pivate Su Fom_Load()

Text1 = ""

With Adodc1

Adodc1.ConnectionSting = "Povide=Micosoft.Jet.OLEDB.4.0;Data Souce=E:\

;Pesist Secuity Info=False"

Adodc1.RecodSouce = "select name fom 1 ode y name"

Adodc1.Refesh

DataGid1.Refesh

End With

End Su

Pivate Su Text1_Change()

Adodc1.ConnectionSting = "Povide=Micosoft.Jet.OLEDB.4.0;Data Souce=E:\

;Pesist Secuity Info=False"

Adodc1.RecodSouce = "select name fom 1 whee name ="" & Text1 & ""

ode y name"

Adodc1.Refesh"對查詢更新

DataGid1.Refesh

End Su