55、窗体设计视图综合应用 窗体上还有一些控件不与数据源相关联 或者以更复杂的方式联接于数据源中的记 录。另外,有些控件还必须能够处理一些 事件,即必须为这些控件的某些事件属性 编程。所有这些需求都必须在窗体设计视 图中进行相应的设计操作方能实现 本节介绍窗体设计视图中的操作方法, 并以前面使用向导创建的窗体为基础,介 绍如何在窗体设计视图中完成“商品进货 数据录入”窗体与“商品上柜数据录入” 窗体的设计 返回
5.5、窗体设计视图综合应用 窗体上还有一些控件不与数据源相关联， 或者以更复杂的方式联接于数据源中的记 录。另外，有些控件还必须能够处理一些 事件，即必须为这些控件的某些事件属性 编程。所有这些需求都必须在窗体设计视 图中进行相应的设计操作方能实现。 本节介绍窗体设计视图中的操作方法， 并以前面使用向导创建的窗体为基础，介 绍如何在窗体设计视图中完成“商品进货 数据录入”窗体与“商品上柜数据录入” 窗体的设计。 返回
Q355窗体设计视图综合应用 05.5.1“商品进货数据录入”窗体设计 05.5.2“商品上柜数据录入”窗体设计 5.5.3“销售数据录入”窗体设计
5.5 窗体设计视图综合应用 5.5.1 “商品进货数据录入”窗体设计 5.5.2 “商品上柜数据录入”窗体设计 5.5.3 “销售数据录入”窗体设计
5.51、“商品进货数据录入”窗体设 计 “商品进货数据录入”窗体是一个 源于单一数据集的窗体。通过以上 各小节的学习,已经基本完成了这 个窗体基本形式的设计,请参考图 5-33所示,调整窗体上各个控件的 位置与尺寸
5.5.1、 “商品进货数据录入”窗体设 计 “商品进货数据录入”窗体是一个 源于单一数据集的窗体。通过以上 各小节的学习，已经基本完成了这 个窗体基本形式的设计，请参考图 5-33所示，调整窗体上各个控件的 位置与尺寸
图5-33供参考的“商品进货数据录入” 窗体设计视图 商品进货数据录入:窗体 口回区 1:112.1·.1:4 5·16·1·7·|·8.19·:10.|:11·|:12.:13.|:14·1:15.1 窗体页眉 商品进货数据录人操作 进货号未绑定进货日期床绑定收货人卡绑定供货商卡绑定 进货名称宋绑定枫科未绑定计量单位未绑定进货单价未绑定进数量未绑定 号责勾辣]量单在进貳单的库存数厍存进期]收木使资商口 主体 E:号货名,格量单进货单价库存数道阵存金额进货日期人供货商 窗体页脚 保存记录 退出
图5-33 供参考的“商品进货数据录入” 窗体设计视图
552“商品上柜数据录入”窗体设计 商品上柜数据录入”窗体是一个源于 多重数据集的窗体。通过以上各小节的 学习,已经使用窗体向导创建了“商品 上柜数据录入”窗体的简单构架,图5 34所示为该窗体创建操作完毕时的参考 形式
5.5.2 “商品上柜数据录入”窗体设计 “商品上柜数据录入”窗体是一个源于 多重数据集的窗体。通过以上各小节的 学习，已经使用窗体向导创建了“商品 上柜数据录入”窗体的简单构架，图5- 34所示为该窗体创建操作完毕时的参考 形式
图5-34供参考的“商品上柜数据录入”窗体设计视 图 商品上柜数据录入:窗体 包回囟 1:5:1·6·l:7.|:8:19·1:10 1·1:12·1.13.:14·1:15·1:16 4窗体页眉 规格:规格 商品上柜数据录入操作 货名 计量单应|计量单样存数单库存数量货单价进货单价柜中期未绑定土柜大卡末绑定 商品晴号用定品名甲绑定回售单价绑定上柜数量用定斗员定 主体 R平1 1:1·1.2.1.3 4.1.5.1.6.1:7.1.8·1.9.1:10.|.11·112:13.|.14·1.1 窗体页眉 主体 号 货号 [名 规格 规格 计量单位 计量 销售单价 售单价 却具 归古
图5-34 供参考的“商品上柜数据录入”窗体设计视 图
比较图5-18所示初创的“商品上柜数据录入”窗体形 式,显然还需要调整窗体上已经设置了的各个控件 位置与尺寸,最后还需在窗体上添加一些控件。 1.添加一个标签控件作为窗体标题 该控件位于窗体页眉上部正中,标题属性值为“商 品上柜数据录入操作”,前景颜色属性值为红色, 字体大小属性值为14 2.添加两个文本框控件放在窗体页脚中 各自的放置位置以及伴随标签的“标题”属性值见 图5-12,均为非结合型文本框。 3.添加三个命令按钮控件(“退出”、“查阅商 品库存数据记录”和“保存数据”按钮) ◆各自的放置位置见图5-12中。其中,“退出”命令 按钮控件的单击事件属性为一段ⅤBA程序代码 这段代码由命令按钮向导生成,并已在544小节中 介绍过了
比较图5-18所示初创的“商品上柜数据录入”窗体形 式，显然还需要调整窗体上已经设置了的各个控件 位置与尺寸，最后还需在窗体上添加一些控件。 1．添加一个标签控件作为窗体标题 该控件位于窗体页眉上部正中，标题属性值为“商 品上柜数据录入操作”，前景颜色属性值为红色， 字体大小属性值为14。 2．添加两个文本框控件放在窗体页脚中 各自的放置位置以及伴随标签的“标题”属性值见 图5-12，均为非结合型文本框。 3．添加三个命令按钮控件（“退出”、“查阅商 品库存数据记录”和“保存数据”按钮） 各自的放置位置见图5-12中。其中，“退出”命令 按钮控件的单击事件属性为一段VBA程序代码。 这段代码由命令按钮向导生成，并已在5.4.4小节中 介绍过了
査阅商品库存数据记录”命令按钮控 件的单击事件属性也是一段ⅤBA程序 代码,也可以由命令按钮向导生成, 与“退出”命令按钮控件的单击事件 不同之处在于:这一段ⅤBA程序代码 为打开一个名为“商品库存数据查询 的窗体。请读者根据5.4.4节所介绍的 方法,自行确定如何利用命令按钮向 导生成如下这一段程序
“查阅商品库存数据记录”命令按钮控 件的单击事件属性也是一段VBA程序 代码，也可以由命令按钮向导生成， 与“退出”命令按钮控件的单击事件 不同之处在于：这一段VBA程序代码 为打开一个名为“商品库存数据查询” 的窗体。请读者根据5.4.4节所介绍的 方法，自行确定如何利用命令按钮向 导生成如下这一段程序
t Private Sub命令63CHiO On Error GoTo Err命令63Cick Dim stDocName As String Dim stLinkCriteria As String stdocname="商品库存数据查询 DoCmd Open Form stDocName,,, stLinkCriteria xit命令63 Click Exit Sub ◆Err命令63 Click: Msg Box Err. Description ◆ Resume exit命令63_CIck End sub
Private Sub 命令63_Click() On Error GoTo Err_命令63_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = "商品库存数据查询" DoCmd.OpenForm stDocName, , , stLinkCriteria Exit_命令63_Click: Exit Sub Err_命令63_Click: MsgBox Err.Description Resume Exit_命令63_Click End Sub
“堡存数据”鱼念按铝擋件的单击事件属性快是 VBA程 是这 钮向导生成,应该在命令按钮向导对话框出现时, 单击“取消”按钮。然后,在其“单击”事件属 性行右端单击“代码生成器”按钮“”,进入 VBA代码编辑窗口,输入下列程序代码。这段程 序的编制将在第六章介绍。 数量”、“进货单价”、“商品名称”四个文本 框控件的“是否锁定”属性设置为“是”,以保 证在这个窗体运行时,不能够更改这四项数据。 “货号”、“货名”、“库存金额”三个文本框 控件的“是否锁定”属性也设置为“是”:“前 景颜色”和“背景颜色”属性均设置为窗体底色, 其且的是在窗体运行时,令这三个文本框中的数 据不可更改,也看不见
“保存数据”命令按钮控件的单击事件属性也是 一段VBA程序代码，但是这段代码不能由命令按 钮向导生成，应该在命令按钮向导对话框出现时， 单击“取消”按钮。然后，在其“单击”事件属 性行右端单击“代码生成器”按钮“”，进入 VBA代码编辑窗口，输入下列程序代码。这段程 序的编制将在第六章介绍。 此外，还需将“规格”、“计量单位”、“库存 数量”、“进货单价”、“商品名称”四个文本 框控件的“是否锁定”属性设置为“是”，以保 证在这个窗体运行时，不能够更改这四项数据。 “货号”、“货名”、“库存金额”三个文本框 控件的“是否锁定”属性也设置为“是”，“前 景颜色”和“背景颜色”属性均设置为窗体底色， 其目的是在窗体运行时，令这三个文本框中的数 据不可更改，也看不见