请问怎样在VB中运用连接数据库和SQL语言啊

问怎样在VB中运用连接数据库和SQL语言啊 --------------------编程问答-------------------- Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset

conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "数据库名;"
conn.ConnectionTimeout = 30
conn.Open

mysqlstr = "select 字段列表 from 数据表 where 条件"

conn.Execute mysqlstr --------------------编程问答-------------------- http://www.connectionstrings.com/
这里有各种各样的连接语句，直接COPY就可以了 --------------------编程问答-------------------- Set   conn   =   New   ADODB.Connection 
Set   rs   =   New   ADODB.Recordset 

conn.ConnectionString   =   "Provider=Microsoft.Jet.OLEDB.4.0;Data   Source="   &   App.Path   &   "数据库名;" 
conn.ConnectionTimeout   =   30 
conn.Open 

mysqlstr   =   "select   字段列表   from   数据表   where   条件" 

conn.Execute   mysqlstr

wile not rs.eof
    text1.text=text1.text & rs.files(0).value
    rs.movenext
wend

补充：VB ,  数据库(包含打印，安装，报表)