sql = "update users set password='" & txtNewPassword.Text & "' where password='" & txtOldPassword.Text & "'" 
运行后,系统提示:"update语句的语法错误,实时错误'-2147217900(80040e14)" 系统:XPSp2+vb6.0Sp6+Access2003