[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 ErrExit

Best Regards,

Kevin

---

__._,_.___

---

Posted by: "zhaoliqingoffice@163.com" <zhaoliqingoffice@163.com>

---

Reply via web post

•

Reply to sender

•

Reply to group

•

Start a New Topic

•

Messages in this topic (1)

---

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!

---

Visit Your Group

• New Members 2

• Privacy • Unsubscribe • Terms of Use

.

__,_._,___