vb 至少一个参数没有被指定值，希望大家帮帮忙解决思路

vb 至少一个参数没有被指定值，希望大家帮帮忙
strConnect = "Provider= Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\st.mdb;Persist Security Info=False"

aa = "stu"
'Call Opendata(aa)
Dim cn As New ADODB.Connection
cn.Open strConnect
cn1 = "update stu set '" & field1 & "'='" & txt2 & "' where 学号='" & txt1 & "'"
Dim st As New ADODB.Recordset

cn.Execute cn1
st.Update

------解决方案--------------------
strConnect = "Provider= Microsoft.Jet.OLEDB.4.0;Data Source= " & App.Path & "\st.mdb;Persist Security Info=False"
 
aa = "stu"
'Call Opendata(aa)
Dim cn As New ADODB.Connection
cn.Open strConnect
cn1 = "update stu set '" & field1 & "'='" & txt2 & "' where 学号='" & txt1 & "'"
Dim st As New ADODB.Recordset
debug.print cn1
msgbox cn1
cn.Execute cn1
 st.Update


把内容贴出来，显然你的SQL语句有问题。
------解决方案--------------------
cn1 = "update stu set '" & field1 & "'='" & txt2 & "' where 学号=" & txt1 & ""
你的学号应该是数字吧，不是字符型吧。
那就不用‘’