VBA连接SQL时若用户名或密码发生错误时，怎样屏蔽 sql错误提示

Function Attach(stLocalTableName As String, stRemoteTableName As String, stServer As String, stDatabase As String, Optional stUsername As String, Optional stPassword As String) Function Attach(stLocalTableName As String, stR