cmd.CommandText = "update {管理员信息} set [密码] = 'Textbox4.value' where [编码] = '" & e.Form.Controls("Textbox1").value & "'"
参考:
http://www.foxtable.com/help/topics/1284.htm