vb连接数据库？用vb怎么连接SQL数据库
一、求VB连接数据库实例
VB使用ADO数据库可以分为有源数据库和无源数据库，即是否使用了DSN数据源，如下例：1、在连接数据库前首先要在VB菜单中“工程”-“引用”从中选择microsoftactiveXDataobjects2。6library和microsoftactiveXDataobjectsrecordset2。
6两个组件，这是在连接数据前所必做的工作。2、接下来定义ADO的连接对象，如下所示：Setconn=NewADODB。ConnectionSetrs=NewADODB。Recordset第一种方法采用的是无源的数据库连接方法conn。
ConnectionString="Driver={sqlserver};server=JSZX3-11;uid=sa;pwd=;database=wzc"conn。ConnectionTimeout=30conn。
Openrs。Open"select用户名,密码fromloginwhere用户名='"&Trim(Combo1。Text)&"'And密码='"&Trim(Text1。
Text)&"'",conn,adOpenStatic,adLockReadOnly,adCmdTextIfrs。EOF=TrueAndrs。BOFThenm=MsgBox("请重新登录",vbExclamation)Text1。
Text=""Text1。SetFocusElseForm1。HideEndIfrs。Close这是第二种方法连接数据库的方法，这一种方法是采用有源的方法与数据库连接的方法，代码如下所示：Setconn=NewADODB。
ConnectionSetrs=NewADODB。Recordsetconn。ConnectionString="DSN=login;uid=sa;pwd=;"conn。ConnectionTimeout=30conn。
Openrs。Open"select用户名fromlogin",conn,adOpenStatic,adLockReadOnly,adCmdTextDimiAsStringFort=0ToVal(rs。
RecordCount)-1i=Trim(rs。Fields("用户名")。Value)rs。MoveNextCombo1。AddItemiNexttrs。Close下面是连接数据库具体代码：PublicconnAsNewADODB。
ConnectionPublicrsAsNewADODB。RecordsetPublicaddFlagAsBooleanPublicFunctionOpenCn()AsBooleanDimmagAsStringOnErrorGoTostrerrmagSetconn=NewADODB。
Connectionconn。ConnectionTimeout=25conn。Provider="sqloledb"conn。Properties("datasource")。Value="127。
0。0。1"''服务器的名字conn。Properties("initialcatalog")。Value="chart"''库名conn。Properties("integratedsecurity")。
Value="SSPI"''登陆类型conn。OpenOpenCn=TrueaddFlag=TrueExitFunctionstrerrmag:mag="Datacan''tconnect"CallMsgBox(mag,vbOKCancel,"Error:Dataconnect")addFlag=FalseEndEndFunctionPublicSubclocn()OnErrorResumeNextIfconn。
StateadStateClosedThenrs。CloneSetrs=Nothing。
二、vb怎么能连接到数据库SQL的服务器
1、打开代码窗口，添加引用：ImportsSystem.Data.SqlClient。
2、输入以下代码：“Publicconn1AsSqlConnection=NewSqlConnection_("server=192.168.1.79;InitialCatalog=student;UserID=panqe;PWD=shentai768@")”，vb就已经成功连接sql数据库了。
3、代码详解：声明关键字Public（因为是全局变量，所以用Public来声明）。
4、连接参数。
5、如果SQL数据库就在本机，则用以下代码连接：("server=.;IntegratedSecurity=False;InitialCatalog=student;UserID=panqe;PWD=shentai768@")。6：如果代码太长，影响可读性，可以用空格加"_"后，回车换行。
三、用vb怎么连接SQL数据库
在VB中，可以使用两种方法来连接SQL数据库：ADO.NET和LINQtoSQL。ADO.NET是一种通用的数据库访问技术，它允许您使用多种编程语言(包括VB)与各种数据库进行交互。而LINQtoSQL是一种轻量级的ORM框架，它允许您使用C#或VB编写代码来查询和操作数据库。
以下是使用ADO.NET连接SQLServer数据库的基本步骤：
1.安装SQLServer驱动程序。
2.在VB中添加对MicrosoftActiveXDataObjects的引用。
3.创建一个SqlConnection对象。
4.使用SqlConnection对象打开连接。
5.创建一个SqlCommand对象并设置其属性。
6.执行命令并读取结果。
7.关闭连接。