最可怕的女人祭祀:access学习过程中收集的一些常用的代码，一起分享学习！

来源：百度文库编辑：偶看新闻时间：2024/04/29 16:04:37

                                                               共同学习共同进步我是个access的初学者，学习过程中遇到的问题相信大家有过类似的经历，现在我把我学习中感觉常用的东西和大家一起分享，可能不很好资料但是我想会给需要的朋友节省不少时间，希望能对你有帮助！  这一行代码是通用声明在vba窗体里是第一行，打开就有
Option Compare Database  A:

打开窗体最大化法1：在vba代码的面声明下面输入以下代码即可：Private Sub Form_Load()    ：打开窗体就有Form_Load代码，是声明打开窗体，然后下面的代码是要执行的代码
    DoCmd.Maximize         ：窗口最大化
End Sub
打开窗体弹出及最大化法2
Private Sub Form_Load()
MsgBox "欢迎使用本软件！"
    DoCmd.Maximize
    End SubPrivate Sub Form_Load()
MsgBox "欢迎使用本软件！"
        End Sub
打开窗体最大化法3：在窗体的属性事件激活在激活栏处输入：=DoCmd.Maximize，就行了
B:             注意：主窗体开头用的是DOCMD 打开子窗体开头用的是ME.用命令按钮打开主窗体或子窗体代码：方法一：
Private Sub Image0_Click()                     打开窗体
DoCmd.OpenForm "窗体1"
End Sub
方法二：
Private Sub Image0_Click()                     退出当前窗体打开新窗体
DoCmd.Close
DoCmd.OpenForm "窗体1"
End Sub方法四：
Private Sub 退出窗体_Click()
DoCmd.Close
DoCmd.OpenForm "注册界面"
MsgBox "确定退出？", vbYesNo
End Sub方法五：
Private Sub Command3_Click()                  .点击查找按钮就打开子窗体
Me.子窗体.Requery
End Sub方法六：
Private Sub Command4_Click()                   '查找文本框空白就打开子窗体
Me.[Text1] = ""
Me.子窗体.Requery
End Sub
C:
退出当前窗体代码
Private Sub 退出窗体_Click()
DoCmd.Close
End Sub
D:
退出系统代码：
Private Sub 退出_Click()    '退出代码
DoCmd.Quit acQuitPrompt
End Sub
E：
   弹出带标题的欢迎窗口：
Private Sub Form_Load()                                              这行代码是表示打开窗口
MsgBox "欢迎使用本软件！", vbOKCancel, "上海迈实验设备！"        这行代码是弹出显示的内容和弹出窗体的标题
        End SubF:
弹出带 “问号” 和 “是否” 两个按钮的弹出窗口
MsgBox("你真的要退出社会抚养费征收管理系统吗？", vbQuestion + vbYesNo + vbDefaultButton2, "提醒您！") = vbYes Then
G:
弹出带黄色感叹号的弹出窗口
MsgBox "注意，您忘了输入密码！", vbExclamation + vbOKOnly, "提醒您！"

收集一些常用的、积极的四字短语？搜集一些生活中常用的数日常生活中常用的一些英文缩写？请教一些论坛中常用的术语侠盗车手中一些常用的命令，。。。？侠盗车手中一些常用的命令，。。。？收集一些常用的WINDOWS命令，我要的是象msconfig之类的东西 Access 的学习步骤？ access的学习教程 “物业代租服务”在买房的过程中是什么意思？常用的ASP连接 access 的方法现在常用的代糖是什么？？国家相关标准？在那里可以找到一些相关资料在学习的过程中自然离不开理论的学习。在学习cad过程中，最主要的是学习什么？收集一些上网的小窃门？收集一些有趣的姓氏收集一些有趣的对联收集一些驰名商标的图片收集一些驰名商标的图片收集一些有趣的对联收集一些经典的名人名言介绍些高二下学期学习数学具体的一些小技巧(就是在解题过程中可以应用的) 请您推荐一些生活中常用的软件？请教电子表格中一些常用函数的用法