1个回答
展开全部
实现代码如下:
这里假设命令按钮名是Command14,子窗体名是chld1,请根据实际情况调整代码中的控件名
Private Sub Command14_Click()
On Error GoTo Err_Command14_Click
Me.chld1.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Command14_Click:
Exit Sub
Err_Command14_Click:
MsgBox Err.Description
Resume Exit_Command14_Click
End Sub
来自:求助得到的回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询