locate for 卡号=allt(thisform.text6.value)
s=val(allt(thisform.text7.value))
if found()
update ic卡基本信息表（管理员） set 余额=余额+s where 卡号=allt(thisform.text6.value)
else
messagebox("用户不存在")
endif
thisform.refresh
充值完成后会改变我原表中第一行的卡号和余额，应该如何解决。

建议用 replace 命令

感觉 数据库的表设计就不太科学
你既然搜索卡号，那就应该把余额 先赋值一下