如何将VB和SQL数据库进行连接

Imports System.Data.SqlClient\\导入命名空间

Dim sqlcn As New SqlConnection("server =(local);database = 数据库名;integrated security=sspi")\\连接语句,使用windiws身份等入服务器
sqlcn.open()\\打开连接

或
Dim sqlcn As New SqlConnection("server = =(local);database = 数据库名;uid=sa;pwd= ")\\连接语句,使用SQL Server身份等入服务器
sqlcn.open()\\打开连接

Dim oleDbConnection1 As OleDb.OleDbConnection
Dim strConnect As Sting="Provider=SQLOLEDB；Persist Security Info=False； Data Source=服务器名；Initial Catalog=数据库名；User ID=sa；Password=；"
oleDbConnection1=New System.Data.OleDb.OleDbConnection（strConnect）
填上的服务器名 和数据库名 用户名 和密码 后用这个语句可以进行连接