使用用户的VB输入打开数据库文件

Question

嗨想要按照组合框打开文件。 以下代码无效。

Set mydb1 = DBEngine.Workspaces(0).OpenDatabase("\\172.22.30.41\Training-Data\Training\Gaus\Vertical Updates & "\" & Combo1.Text & ".mdb")

有人能指出我的代码中有什么问题吗？

Answer 1

字符串连接中存在语法错误，其中斜杠位于Updates和Combo1.Text之间。我在此页面上添加了db变量以便于阅读：

Dim db as string
db = "\\172.22.30.41\Training-Data\Training\Gaus\Vertical Updates\" & Combo1.Text & ".mdb"  
Set mydb1 = DBEngine.Workspaces(0).OpenDatabase(db)