在Visual Basic（VB）中连接数据库，通常有以下几种方法：
1. 使用ADO（ActiveX Data Objects）连接数据库：
引入ADO库。
创建ADO连接对象。
配置连接字符串。
打开连接。
执行SQL语句。
处理查询结果。
关闭连接。
2. 使用DAO（Data Access Objects）连接数据库：
引入DAO库。
创建DAO连接对象。
配置连接字符串。
打开连接。
执行SQL语句。
处理查询结果。
关闭连接。
3. 使用OLE DB数据提供程序连接数据库：
引入System.Data.OleDb模块。
定义连接字符串。
创建OleDbConnection对象并使用Open（）方法打开连接。
4. 使用ODBC数据源连接数据库：
配置ODBC数据源。
在代码中引用适当的ODBC驱动程序。
创建连接对象并使用Open（）方法打开连接。
5. 使用特定的数据库控件连接数据库（如使用ADODC控件连接Access数据库）：
引入相应的数据库控件。
设置控件的数据源和记录集。
连接数据库并执行查询。
Sub 连接数据库（）Dim conn As ADODB.ConnectionDim strConn As StringstrConn = "Provider=Microsoft.ACE.OLEDB.12.0；Data Source=C:\你的数据库路径\你的数据库名称.accdb；"Set conn = New ADODB.Connectionconn.Open strConnIf conn.State = adStateOpen ThenMsgBox "数据库连接成功!"ElseMsgBox "数据库连接失败!"End Ifconn.CloseSet conn = NothingEnd Sub
请根据你的具体需求选择合适的连接方法，并确保数据库路径和名称正确无误。如果需要连接其他类型的数据库，如SQL Server，则需要修改连接字符串以适应相应的数据库类型和驱动程序