Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Page.IsValid Then
Dim con As New OleDbConnection
con.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("../xf/database/xinxi.mdb")
Dim cmd As New OleDbCommand
cmd.CommandText = "insert into person(id,password,name,sex,birthdate,zjhm,email,address) values('" + TextBox1.Text + "','" + TextBox2.Text + "'," + TextBox4.Text + "," + TextBox5.Text + "" + TextBox6.Text + "#" + TextBox7.Text + "#,'" + TextBox8.Text + "')"
cmd.Connection = con
con.Open()
cmd.ExecuteNonQuery()
con.Close()
End If

以上代码哪里有问题??我想做一个注册的界面,可是填完个人信息后,点击提交就出现下面的错误,知道的人帮帮我
谢谢谢谢```

," + TextBox4.Text + "," + TextBox5.Text + "" + TextBox6.Text + "#" + TextBox7.Text + "#,'" + TextBox8.Text + "'
这一段的值仔细检查一下
格式应该和前面的一样
'" + 控件值 + "'

sex 后面的选择我是用 RadioButton 控件

我现在改用这种方法写代码了
cmd.Parameters.Add(New OleDbParameter("@sex", OleDbType.VarChar))
cmd.Parameters("@sex").Value =

但是我不知道 value 后面的值要怎么写?????

Dim sex As String
If Me.RadioButton1.Checked Then
sex = "男"
Else
sex= "女"
End If
cmd.Parameters.Add(New OleDbParameter("@sex", OleDbType.VarChar))
cmd.Parameters("@sex").Value = sex

不如把sex字段设为真/假, 然后("@sex").Value = RadioButton1.Checked
我一般爱这么干

不要用+ 用&