VB.net中SQL数据库插入操作：Insert小例子

Imports System.Data.SqlClient'数据库连接语句，还需在项目中引用SQL相关组件才能用
    Public myConn As SqlConnection = New SqlConnection _
                             ("server=.; Integrated Security=False;Initial Catalog=钣金加工MES系统; User ID= sa;PWD=lbllbllbl") '（连接数据库）
         myConn.Open()
         Dim Strxzyh As String
         Strxzyh = "insert into 用户 (用户编号,用户名称,用户密码,角色编号,权限模块) " & _
                       "values ('" & yhnumstr & "' ,'" & TextBox7.Text & "','" & TextBox1.Text & "','" & jsnumstr & "','"            & ComboBox1.Text & "')"
         Dim myComm As New SqlCommand(Strxzyh, myConn)
         myComm.ExecuteNonQuery()
         myConn.Close()