Question

vb在做对access数据库进行修改时显示 “至少有一个参数没有被指定值”

代码如下
Private Sub cmdModify_Click()
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\db2.mdb;" & "Persist Security Info=False"
conn.Open
rs.Open "select * from Emptable where 编号 =" & Val(txtID.Text), conn, adOpenKeyset, adLockOptimistic

txtID.SetFocus
rs.Fields(1).Value = txtName.Text
rs.Fields(2).Value = txtGender.Text
rs.Fields(3).Value = txtAddr.Text
rs.Update
MsgBox "记录修改成功"
rs.Close
conn.Close
frmMain.ReShow
End Sub

Answer 1

单就这段代码本身没有什么错误~ 你点调试按钮 看错误在哪一行

追问

我正在修改，有点变动，不过错误都在这行

追答

你数据库里没有 编号 这个字段