看看,是不是第一次不行,然后第二次就可以,beforeopenproject 执行这样的代码测试
Dim s As String = ""msgbox(Connections.TryConnect(s))msgbox(Connections.TryConnect(s))msgbox(Connections.TryConnect(s))