01.strSQL = "INSERT INTO member (Username,[Password],Name,Email) " & _
02." VALUES " & _
03." ('" & Me.txtUsername.Text & "','" & Me.txtPassword.Text & "', " & _
04." '" & Me.txtName.Text & "','" & Me.txtEmail.Text & "')"
05.
06.objCmd = New OleDbCommand
07.With objCmd
08. .Connection = objConn
09. .CommandText = strSQL
10. .CommandType = CommandType.Text
11.End With
