用set data1.databasename=.....语句吧

解决方案 »

  1.   

    你在关闭Data1后在打开就可以,记得Refresh了
      

  2.   

    在别的事件中当然也能用。
    在data1.databasename=....后面加一句
    data1.refresh
      

  3.   

    是添加一个模块吗?我加了后添加语句 global dbname as string
    在第一个引用窗体可引用,到第二个窗体就不行
      

  4.   

    建议使用CommonDialog控件(看上去很专业,很好看!)
    If CommonDialog1.CancelError Then
        MsgBox "没有打开数据库文件", vbExclamation, "消息提示"
    Else
        CommonDialog1.FileName = "数据库.mdb"
        CommonDialog1.Filter = "数据库文件(*.mdb)"
        CommonDialog1.ShowOpen
        FilePath = CommonDialog1.FileName
        data1.database=FilePath
        ......
      

  5.   

    是模块,不过不是这样定义的而是
    Public gDataName As String