请教vb程序段中下面的语句是什么意思?
Dim StrPath As String
    StrPath = App.Path +"\db1.mdb;"
    Set mConnection = New ADODB.Connection
     mConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + StrPath + "Persist Security Info=False", "", ""
  谢谢,o(∩_∩)o...

解决方案 »

  1.   

    App.Path 设置当前程序路径下的Acess数据库
      

  2.   

    Dim StrPath As String                           '// 定义strpath 是一个字符串
    StrPath = App.Path +"\db1.mdb;"              '//字符串 STRPATH 的值等于 程序运行相对路径 & “\db1.mdb” &意思为字符串对接
    Set mConnection = New ADODB.Connection       '//指定 MCONNECTION 是一个新的ADO连接对象
    mConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + StrPath + "Persist Security Info=False", "", ""   '//连接对象.打开 数据库连接字符串