with data1
.addnew.delete
.movenext.refresh.msgbox"worng:"&error$(dataerr)
end with
form_activate
with data1
.movelast
totalrecord=data1.r.recordcount
.movefirst
end with
.addnew.delete
.movenext.refresh.msgbox"worng:"&error$(dataerr)
end with
form_activate
with data1
.movelast
totalrecord=data1.r.recordcount
.movefirst
end with
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货