库存管理系统 软件开发 VB SQL - 图文(6)

通过【统计】按钮，就能实现日出入货信息的查询。实现代码如下；

6) 出入库现金统计设计

1） 概述

出入库现金统计是对库出库的货品的日现金信息进行查询。

2）设计思想

在货品出库窗体中添加Frame控件、Text控件数组、标签控件、Adodc控件、DataGrid控件CommandButton等控件。添加完控件的窗体如下图所示。

通过【统计】按钮，就能实现日出入现金信息的查询。实现代码如下；

（4） 数据报表模块

在VB中添加数据环境DataEnvironment，在其中的属性项的连接中添加对应的数据库，然后在其中添加要显示的数据，显示如图：

（2）出库明细报表设计；

展开数据环境中的Comd_Pout命令，单击“工程”/“添加DataReport”命令，在“库存管理系统”工程中添加一个DataReport对象。设置其名称属性值为“Data_out”，“DataEnvironment1”，DataMember属性值为“Comd_Pout”。在数据报表对象DataReport中单击鼠标右键，在弹出的菜单中选择“检索结构”命令。

然后将数据环境设计器中的Comd_Pout命令下的字段依次拖曳到数据报表对象DataReport中的“细节”里，将标题也拖曳到“细节”里，并将标题与数据控件摆放整齐。设计结果如下：

货品出库信息报表设计完成之后，在Ftm_main主程序窗体的“数据报表”菜单下

的“出库报表”子菜单的单击事件下添加如下的代码： Private Sub PRINTOUT_Click() Data_out.show Me.Enabled=False