2.“保存记录”命令按钮单击事件处理 在“商品进货数据录入”窗体设计视图中 选定“保存记录”命令按钮,假定该命令 按钮控件“名称”属性值为 “ Command353。调出属性对话框,选定 “事件”卡,在“更新后”事件行右侧单 击“生成器”按钮“”。在随即出现的 “选择生成器”对话框中,选中“代码生 成器”选项,然后单击“确定”按钮“” 进入VBE编程环境。 ◆然后,在VBE代码窗口中输入如下程序代 码,编写完成后关闭ⅤBE,返回窗体设计 视图
在“商品进货数据录入”窗体设计视图中， 选定“保存记录”命令按钮，假定该命令 按钮控件“名称”属性值为 “Command35”。调出属性对话框，选定 “事件”卡，在“更新后”事件行右侧单 击“生成器”按钮“”。在随即出现的 “选择生成器”对话框中，选中“代码生 成器”选项，然后单击“确定”按钮“”， 进入VBE编程环境。 然后，在VBE代码窗口中输入如下程序代 码，编写完成后关闭VBE，返回窗体设计 视图。 2．“保存记录”命令按钮单击事件处理
Private Sub Command35 Click( Me![货名]=Mel[Text21 Me![规格]=Me![text78] Me![计量单位]= Me!texts80] Me![库存数量]=Me库存数量]+ Me![Text271 Me![进货单价]= Me![Tex25 Me[收货人]=Me! Combo4 Me供货商]=Me![ Combo45] Me![进货日期]= Me![Text229 DoCmd. Domenultem ac Formal ac RecordsMenu. ac SaveRecord. acMenu Ver 70 Me. Refresh ◆ End sub
Private Sub Command35_Click() Me![货名] = Me![Text21] Me![规格] = Me![text78] Me![计量单位] = Me![text80] Me![库存数量] = Me![库存数量] + Me![Text27] Me![进货单价] = Me![Text25] Me![收货人] = Me![Combo41] Me![供货商] = Me![Combo45] Me![进货日期] = Me![Text29] DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 Me.Refresh End Sub
3.“退出”命令按钮单击事件处理 鼻在“商品进货数据录入”窗体设计视图中, 选定“退出”命令按钮,假定该命令按钮 控件“名称”属性值为“ Command47。调 出属性对话框,选定“事件”卡,在“更 新后”事件行右侧单击“生成器”按钮, 即可直接进入VBE编程环境。这是由于在 第5章创建该命令按钮控件时,我们在 Access2003向导的引领下完成了这个命令 按钮功能设定:关闭本窗体 然后,在VBE代码窗口中可以看到如下程 序代码,无须加以改动即可关闭VBE,返 回窗体设计视图
在“商品进货数据录入”窗体设计视图中， 选定“退出”命令按钮，假定该命令按钮 控件“名称”属性值为“Command47”。调 出属性对话框，选定“事件”卡，在“更 新后”事件行右侧单击“生成器”按钮， 即可直接进入VBE编程环境。这是由于在 第5章创建该命令按钮控件时，我们在 Access 2003向导的引领下完成了这个命令 按钮功能设定：关闭本窗体。 然后，在VBE代码窗口中可以看到如下程 序代码，无须加以改动即可关闭VBE，返 回窗体设计视图。 3．“退出”命令按钮单击事件处理
Private Sub Command47 Click( ◆ On Error goto Err Command 4 7 Click DoCmd. Close t Exit Command 7 Click Exit sub ◆ Err Command47 Click: Msg Box Err. Description Resume exit command 7 Click ◆ End sub
Private Sub Command47_Click() On Error GoTo Err_Command47_Click DoCmd.Close Exit_Command47_Click: Exit Sub Err_Command47_Click: MsgBox Err.Description Resume Exit_Command47_Click End Sub
642“商品上柜数据录入”窗体程序模块设 计 首先进入“商品上柜数据录入”窗体 设计视图。根据我们在6.1节的分析, 需要在这个设计视图中,完成四段 程序设计
首先进入“商品上柜数据录入”窗体 设计视图。根据我们在6.1节的分析， 需要在这个设计视图中，完成四段 程序设计。 6.4.2 “商品上柜数据录入”窗体程序模块设 计