> ลองจัดชุดคำสั่งเป็นแบบนี้ครับ
DoCmd.SetWarnings False
Dim SQL As String
SQL = "UPDATE select SET select.เลขที่สด1 =Text188.value"
DoCmd.RunSQL SQL
Me.Refresh 'หรือ Me.Recalc
DoCmd.SetWarnings True
> หรืออัพเดทที่ตาราง tb_recuit โดยใช้ WHERE เพื่อกรองข้อมูลที่ต้องการ
.....
CurrentDb.Execute = "UPDATE tb_recuit SET เลขที่สด1 = "& me.Text188 &" WHERE ฟิวส์ = '" & มีค่าเท่ากับ & "'", dbFailOnError
Me.Recalc
.....