如何用VB实现连接SQL数据库

1、打开代码窗口，添加引用：Imports System.Data.SqlClient。

2、输入以下代码：

“Public conn1  As SqlConnection = New SqlConnection _

("server=192.168.1.79Initial Catalog= studentUser ID= panqePWD=shentai768@")”，vb就已经成功连接sql数据库了。

3、代码详解：声明关键字Public（因为是全局变量，所以用Public 来声明）。

4、连接参数。

5、如果SQL 数据库就在本机，则用以下代码连接：

("server=.Integrated Security=FalseInitial Catalog= studentUser ID= panqePWD=shentai768@")。

6：如果代码太长，影响可读性，可以用空格加"_"后，回车换行。

下面的代码仅供参考：

imports System.data.oledb /*引用命名空间*/

dim cnstr = "provider=microsoft.jet.oledb.4.0,data source=Access数据库文件位置" /*定义连接字符串*/

dim cn as oledbconnection = new oledbconnection(cnstr) /*定义连接*/

cn.open() /*打开连接*/

sqlstr="select... from... 或其他sql"

dim cmd as sqlcommand=new sqlcommand()

cmd.commandtext=sqlstr

cmd.connection=cn

/*以上是建立执行语句*/

cmd.executenonquery() 不返回结果

cmd.executescalar() 返回单个结果

cmd.executereader() 返回结果集

/*以上是执行sql语句的方法*/

cn.close() /*关闭连接*/

你要做用户验证的话，先根据用户名查询对应的密码，再判断用户输入的密码和查询结果是不是相同就可以了

用cmd.executescalar() 这个方法

既然是VS2008，那你的VB一定是VB.NET了， 你必须用ADO.NET *** 作数据库，进行检测，查找以及插入新的用户。 追问： 你会不会啊？能给我教教吗？ 回答： 这样，你打开你的VS2008，按F1看文档，查找ADO.NET，里面有代码示例，中文的，自己学学，我也不可能花几个月时间手把手的教你你说对吧。 追问： 我们要交作业 老师说要连接到数据库上实现多个窗体 我想能从数据库里查出一些数据能进行修改和删除功能 你能不能帮我做一下 我自己在看着改一改 回答： 兄弟，你没学会我就不说啥了，可能你不愿意学。但是，你直接让别人帮你写代码，这个不太可能。我工作也忙。抱歉了。我都告诉让你看MSDN了，有代码示例，你都不去看。那还让我说啥啊。 追问： 不是不愿意学 我们发了一本VB书 老师教的是VB.net 两星期上一次课 而且上课的时候老师讲的例子有时候连老师自己都运行不过去 然后老师说你们自己研究一下吧 最后的连接数据库老师根本就没有讲 让自己看 书上教的是VB连接数据库 拿到VB.net上根本不行 最后说自己做一个作业作为期末考试成绩 你说愁不愁？不过还是谢谢你 我自己在看看MSDN吧 回答： 凡是你想知道的VB或者VB.NET知识，在MSDN里全部都有，自学足以。祝你成功。

---