Kevin
I'm curious. That code seems like overkill. Can you explain what clicking the command button does?
Regards,
Bill Mosca, Founder - MS_Access_Professionals
http://www.thatlldoit.com
Microsoft Office Access MVP
https://mvp.microsoft.com/en-us/PublicProfile/35852?fullName=Bill%20%20Mosca
My nothing-to-do-with-Access blog
http://wrmosca.wordpress.com
---In MS_Access_Professionals@yahoogroups.com, <zhaoliqingoffice@163.com> wrote :
Dear All,
My problem is solved. Thanks.
I changed the "Me.Requery" into "Me.Refresh" in the Public command button.
Best Regards,
Kevin
Date: 2016-04-08 14:30Subject: [MS_AccessPros] After running this code, the form keeps blinking without stop.Dear All,After running this code, the form keeps blinking without stop. Please help.On Error GoTo ErrHandle
Dim rst As DAO.Recordset
Set rst = Me.subRoomUpdate.Form.Recordset
rst.MoveFirst
Do Until rst.EOF
Call Me.subRoomUpdate.Form.Command64_Click
rst.MoveNext
Loop
Set rst = Nothing
ErrExit:
Exit Sub
ErrHandle:
Resume ErrExitBest Regards,Kevin
__._,_.___
Posted by: wrmosca@comcast.net
Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (3) |
Have you tried the highest rated email app?
With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? The Yahoo Mail app is fast, beautiful and intuitive. Try it today!
.
__,_._,___
Tidak ada komentar:
Posting Komentar