请问各位大哥大姐,兄弟姐妹,怎么根据text1.text 里面的内容删除数据表中相关的行.
是不是"delete from tslbb where 类别编号="'+text1.text'"" order by 类别编号"
如果是, 怎么写连接数据库的语句呢?
我的数据库是books ,数据表是tslbb,
定义了工程公共变量 Cnn = "DSN=NBooks"
小生毕业答辩在即,希望各位仁兄仁姐大发慈悲啊!

dim con as new adodb.connection
dim rs as new adodb.recordset
dim strcon as string
strcon= "Provider=Microsoft.Jet.OLEDB.4.0;data source=" & app.path & "\books.mdb"
con.open strcon
set rs = con.execute("delete from tslbb where 类别编号='" & text1.text & "'")

更正下
'" & text1.text & "'要换成'" + trim(text1.text) + "'

说白了就是用你要输入或者选择的内容从新构造SQL语句，执行其即可。