方法一:进入设计摸式,在窗体上添个一个按钮。然后右击它,在事件属性中找到单击,进入代码模式,输入以下代码:
Private Sub Command1_Click()If MsgBox("真的要离开了吗?", vbOKCancel + vbQuestion, "你是不是该安静的离开?") = vbOK Then
DoCmd.Close
End If
End Sub
方法二:创建一个公用模块,在模块中建立以下公用过程:
Public Sub AJLK()If MsgBox("真的要离开了吗?", vbOKCancel + vbQuestion, "你是不是该安静的离开?") = vbOK Then
DoCmd.Close acForm, Screen.ActiveForm.Name
End If
End Sub
然后在窗体中添加按钮的单击事件:
Private Sub Command1_Click()AJLK
End Sub
方法三:类似于方法二,公用模块:
Public Sub AJLK(formname As String)If MsgBox("真的要离开了吗?", vbOKCancel + vbQuestion, "你是不是该安静的离开?") = vbOK Then
DoCmd.Close acForm, formname
End If
End Sub
窗体按钮单击事件:
Private Sub Command1_Click()AJLK me.Name
End Sub
方法四:在公用模块建立一公用函数
Public Function AJLK() As BooleanIf MsgBox("真的要离开了吗?", vbOKCancel + vbQuestion, "你是不是该安静的离开?") = vbOK Then
DoCmd.Close acForm, Screen.ActiveForm.Name
End If
End Function
然后在窗体按钮的事件中直接输入=AJLK() 如下图示:
当然,还存在很多其它的方法,这里就不一一列举了。
Access禁用宏就退出这个可以在宏安全性中设置,打开个空表,然后在“工具”菜单-“宏”-“安全性”,可以设置“非常高”到“低”,根据需要设置。看过信息,应该属于“宏被禁用”的情况不多说直接开整,选择“工具”菜单
选择“工具”菜单,然后选择“宏”“安全性”
在“安全性”对话框中,单击选项按钮“中”将安全级设置为“中”
设置完成“确定”后,打开试试,呵呵不错,出现安全警告了,选择“禁用宏”
你看你看,这不Ok了么
可能原因之宏安全性设置为:“非常高”
应用程序有签名的宏,但宏被自动禁用。使用以下步骤启用宏。
选择“工具”菜单选项,然后选择“宏”“安全性”。在“安全性”对话框中单击“高”按钮将安全级别设为高。
关闭该文件和计算机上当前运行的该应用程序的任何其他实例(关闭使用您当前正在运行的应用程序的任何应用程序)。
直接录制宏吧。录制时的顺序很重要。1:工具---宏---录制新宏---输入名字如“北京”---确定---点击另一页---再返回准备录制的页---选中某一不用的单元格----插入---超级连接---从查找范围里找到你准备打开的文件---双击它确认---点击这个单元格打开你准备打开的文件----返回录制宏的界面(如果你想在表格里留着这个链接就停止录制)如果不想留在表面上---右键点击这个单元格---取消超级连接---停止录制。
2:按钮编辑状态下把北京输入在如下的位置。
Private Sub CommandButton1_Click()
北京
End Sub
好了!说的够麻烦的,你慢慢看吧。保证能用,天天在用。
祝你成功!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)