VB.NET操纵SQLServer

需要导入Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.oleDb

Visual Basic.NET图形图像编程与实例详解 - 是本好书
通过 SqlConnection对象连接SQLServer
然后通过SqlCommand 或 SqlDataAdapter  DataSet来操纵数据库。
Try
            Dim com As New SqlCommand()
            com.Connection = sqlcon

            Dim idd As New SqlParameter("@xn", SqlDbType.Int, 4)
            Dim username As New SqlParameter("@username", SqlDbType.Char, 20)
            Dim pass As New SqlParameter("@pass", SqlDbType.Char, 15)
            Dim m_part As New SqlParameter("@part", SqlDbType.Char, 100)
            Dim m_sov As New SqlParameter("@sov", SqlDbType.Char, 100)

            Dim str = "insert into userInfo (id,username,pass,所属部门,学历) values(@xn,@username,@pass,@part,@sov)"
            com.CommandText = str

            idd.Value = TextBox1.Text
            username.Value = TextBox2.Text
            pass.Value = TextBox3.Text
            m_part.Value = TextBox4.Text
            m_sov.Value = TextBox5.Text

            com.Parameters.Add(idd)
            com.Parameters.Add(username)
            com.Parameters.Add(pass)
            com.Parameters.Add(m_part)
            com.Parameters.Add(m_sov)

            com.ExecuteNonQuery()
        Catch ce As Exception
            MessageBox.Show("该用户已存在" + ce.Message)
        End Try