Question No value given for one or more required parameters.

[viper5646]

Hi
I keep getting the error "

No value given for one or more required parameters.

"
This is my code"

  m_Usercon.Open()

            Dim cmd As New OleDb.OleDbCommand

            Dim MYSQL As String = "Update Users_tbl set [User]='" & txtUser.Text & "',UsrName='" & txtName.Text & "',Usrini='" & _
            txtINI.Text & "',[Password]='" & txtPassWord.Text & "',[Level]=" & level & ", usrActive=" & _
            IIf(ChkActive.Checked, 1, 0) & "  Where ID=" & UserID & ""

            cmd = New OleDb.OleDbCommand(MYSQL, m_Usercon)
            cmd.CommandType = CommandType.Text
            cmd.CommandText = MYSQL
            cmd.ExecuteNonQuery()
            m_Usercon.Close()

Here is a copy of MYSQL while debugging it.
"

Update Users_tbl set [User]='John',UsrName='John Ribeiro',Usrini='JR',[Password]='5646',[Level]=1, usrActive=1 Where ID=2

"

These are the data types in the Access DB User=text, UsrName=Text UsrINI=text, Password=text, Level=Number, UsrActive=yes/no

Can someone help me solve this situation

Thanks.