Private Sub Command1_Click()
Adodc2.RecordSource = "select * from 用户登录表 where 学生学号 like '" & Text16.Text & "'"
Adodc2.Refresh
  Adodc2.Recordset.Fields(2).Value = Text1.Text
  Adodc2.Refresh
End Sub
上面的代码是点击Command1后查找记录然后修改其中的字段,但是为什么我的修改不了啊?什么地方出错了啊?

数据库连接正确,查找的记录存在!

Private Sub Command1_Click()
Adodc2.RecordSource = "select * from 用户登录表 where 学生学号 like '" & Text16.Text & "'"
Adodc2.Refresh
  Adodc2.Recordset.Fields(2).Value = Text1.Text
   Adodc2.RecordSet.Update
  Adodc2.Refresh
End Sub

少了UPDATE吧

Update
 set
语句 做 修改操作