Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > 程序人生

变速箱开发笔记概要

时 间:2012-09-08 21:13:36
作 者:七夜   ID:16896  城市:厦门
摘 要:变速箱开发笔记概要
正 文:

 

1、新增窗体步骤概述:

1、  定义rst变量为DAO数据类型;

2、  判断控件内是否为空;

3、  判断控件内数据是否重复;Acchelp_StrDataIsExist("表名", "字段名", 控件名) = True

4、  通过msgbox询问用户是否要保存数据;

5、  保存数据的代码:

     set rst 为打开表中的记录,并赋值给rst

Set rst = CurrentDb.OpenRecordset("tblcodebxlb", dbOpenDynaset)

     新增一行数据 rst.addnew

     给数组rst内其他字段赋值,例如编号,等

     rst内对应控件的字段赋值;

     rst内新增的数据写入表中, rst.update

     关闭rst

     rst赋值空值

     刷新程序主窗体,并刷新其数据源

判断是否加载了控制面板窗体,

Forms!usysfrmmain!frmChild.SourceObject = "frmbxlb_child" 前后记得要写一个消除警告的代码docmd.echo false true

     用对话框提示保存成功,msgbox

6、增加一些提高输入速度的技巧性功能:

①、下拉列表自动展开:lbid控件获得焦点事件中输入:me.lbid.dropdown;

②、lbid更新后事件:让下一个要输入的控件自动获得焦点:me.ygid.setfocus

③、ygid的获得焦点事件中输入me.ygid.dropdown;更新后事件让下一个控件获得焦点

……以此类推

2、修改窗体的制作步骤:

1) 先给基础窗体的主键字段编写获取焦点事件;

2)  在基础窗体的成为当前事件中输入=selectrecord()  目的:使得光标所在整行变黑,且第一个字段获得焦点 ;

3)写修改窗体加载事件,并将光标所在行参数赋值给全局变量;

4)写修改按钮的单击事件:

     判断控件值是否为空;

     刷新数据  me.refresh

     给子窗体附上窗体来源:Forms!usysfrmmain!frmChild.SourceObject = "frmbxlb_child"  前后要加消除警告语句;

     书写触发基础窗体的计时器事件,并设定计时器事件的触发间隔时间;

     编写基础窗体计时器的触发事件:平台函数acchelp_findstrrecoder(全局变量)

     书写关闭修改窗体的代码,docmd.close acform,”修改窗体名称

 

3、编写删除数据代码

1)      Public Sub btnDel()

2)      通过msgbox判断用户是否确定要删除该数据;

3)      取消警告提示

4)      如果用户选择是,则通过平台自定义函数AccHelp_DeleteFldstrRow(“表名”,“字段名”,selectstr)删除该数据;

5)      重新给基础窗体子窗体赋上窗体数据源Forms!usysfrmMain!frmChild.SourceObject = "frmyg_child"

6)      恢复警告提示

 

系统自定义的查询功能:

1、  编写public sub btnfind()函数

     打开系统窗体usysfrmfind

     窗体的cobfldname控件的.rowsource 行来源属性需要赋值为字段名称,数据类型,”

其中字段类型为 '文本型对应 3 ,日期型对应 1 ,数值型对于 2

 

     指定查询的数据来源:Forms!usysfrmFind!labDataSource.Caption = "qryBxmx"

单击查询按钮定义查询的子窗体的数据来源。

Public Sub FindEnd()
Forms!usysfrmMain!frmChild.Form.RecordSource = Acchelp_ChildFormRecordSource("qryBxmx", "
报销编号
", True)
End Sub



Access软件网官方交流QQ群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助