Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim con As New SqlConnection("Server=localhost; Database=Northwind; Integrated Security=true") con.Open()

Dim cmd As New SqlCommand("select employeeid from employees where city='London'", con) Dim rs As SqlDataReader = cmd.ExecuteReader()

While rs.Read ComboBox1.Items.Add(rs(0)) End While

con.Close() con.Open() 问题出在这行 告诉我说：未处理的“System.Data.SqlClient.SqlException”类型的异常出现在 system.data.dll 中。

其他信息: 系统错误。

          你的数据库连接字符串可能有问题，用你的代码在.net开发环境调试了一下，但是数据库字符串换成
workstation id=RJ;packet size=4096;user id=sa;data source=RJ;persist security info=False;initial catalog=Northwind

没有出现错误。RJ为计算机名称。

你可以先用dataadapter 让.net为你自动添加连接，然后再把那些复制一下你可以手动删除一些，等到没有exception的时候又是最少代码的时候，你就赚了！！！！1！！！！！