罗斯文数据库学习连载（43）

来源:ACCESSOFT 点击数:14521 　 | 收藏 | 复制

时　间:2008-11-10 12:18:20
作　者:马丽 ID：94 城市：南通
摘　要:“供应商”窗体
正　文:

4、“供应商”窗体

“供应商”窗体用于增加和编辑供应商信息，并提供查看供应商供应的产品功能。进入设计视图:

“数据源”为“供应商”表，主体中主要是“供应商”表中的一些字段，可以直接从字段列表中拖入设计窗体，并将位置调整的合格。

窗体页脚中有两个按钮，一个是“回顾产品”按钮，这里也是通过编程的方法来实现功能的，先查看“回顾产品”按钮的事件属性，在单击事件后的选择器中点击，直接打开到VBE窗口，并定位在回顾产品的click事件中。这里用到了一个If…Else…End if的分支结构。

先判断一下窗体中的公司名称文本框是否为Null值，如果为Null值，则提示信息（利用msgbox函数，具体可查看帮助），并让公司名称文件框获得焦点（setfocus方法）；如果公司名称不为Null值，则执行else后面的内容，打开窗体“产品列表”，并将窗体移动到固定的位置（docmd.movesizw），这里主要用到的是openform这个方法，这是一个经常用到的方法，要理解它的参数的用法，在本例中用到了WhereCondition这个参数，相当于SQL语名中的条件子句，起到筛选作用，只显示与主窗体中“供应商ID”一致的产品。具体可查看帮助。

“增加产品”按钮也是用代码实现的，同样也是一个openform方法的应用，这里用到了另外两个参数，DataMode用于设定打开窗体处于什么状态，本例中是acFormAdd 用户可以添加新记录，但是不能编辑现有记录（即数据输入属性）；另外一个是OpenArgs属性，具体的请查看帮助。