敲学生的时候，
代码基本是模仿源码，对于源码连接
数据库的
方法也是一知半解，现在敲机房，没有源码，就需要学会熟练的连接
数据库。
对比学生连接
数据库的
方法，不难发现，其实就是一个固定的语句：txt
sql= "select * from
数据库表名 "，如果要
锁定到查询的行：txtsql= "select * from 数据库名 where 数据库关键字 = '" & 关键字 "'"。然后接上一句：Set mrc=Executesql(txtsql,MsgText)。如图
Dim txtsql,MsgText As String
Dim mrc As ADODB.Recordset
txtsql= "select * from User_Info where userID = '" & txtUserName.Text & "'"
Set mrc = Executesql(txtsql,MsgText)
当然，txtsql和MsgText还有mrc都是需要声明的。
通过
代码中的语句先到达Execute
sql，执行语句到cnn.Open ConnectString
跳转到ConnectString。完成了
数据库的连接。
