实质纲要玉蒲团之淫行天下

录入、保存入库明细、打印入库单动态添加数据考证日历控件录入日历TextBox搭配ListBox控件，恶浊搜索、选拔录入物料明细

环球好，我是冷水沏茶。

前几天在论坛上看到一个求援贴，许多年夙昔的旧贴了：

录入、保存入库明细

诸位坛友周末好：

现把入库单上的入库信息汇总到活水帐纪录表中。

性吧有你

1、单子号：RK+年月日+001（001为单子活水号）--到下一年从零再行计。

2、序号按品号递加

3、点保存后，本札纪录信息（如第二责任表）保存到"汇总入库单纪录"

4、本入库单有上百条物料，输入完成后，在D列行末自动填上共计和汇总和（如黄色单位格）

5、汇总入库单纪录中罕有据的区域自动添加边框玉蒲团之淫行天下。

6、点打印后，本入库单到行底（崇敬东说念主）自动打印。

烦请大神指教，感谢！   

 进出库方面的需求一经相比多的，一直想作念一个进销存、进出库方面的行使，然而嗅觉责任量相比大，一直也莫得技术与决心去作念。

今天这个案例应该属于进出库当中的一小块实质，这两天花了点技术，基本完成一个框架，有点野蛮，咱们一说念来看一下。

1、入库单表，是一个录入数据的模板：

图片

2、入库明细表，保存入库明细数据，我修改了责任表名，删除原表头，把它造成一个圭臬的二维表：

图片

3、物料表：这是我添加的，本来的需求中并莫得提供这张表。

图片

还有一些表，除了供应商，其余类别、业务员、仓库王人是我添加的，方针是在录入日库单的时候不错选拔录入。

需求难度不算大，我准备用ADO数据蚁集来责罚查询、添加明细纪录等。

想路与功能阐扬：

1、在录入入库单的时候，供应商、类别、业务员、仓库王人通过SQL查询对应的表中的纪录，添加相应单位格的数据考证，供选拔输入。2、录入商品明细，咱们招揽TextBox+listBox来选拔输入，不错恶浊搜索。3、咱们录入完成后，点保存，把数据更新到“入库明细表”中，招揽更新纪录集的形势。保存完之后，不错打印责任表，这个莫得写什么代码，径直打印责任表4、点“保存并打印”则保存数据并打印责任表。。5、点新增，把入库单物料数据区域清空，单子号+1。6、点新号，字据入库日历，刷新为最新的空缺单子号。7、入库日历，咱们把【日历控件】整合进来，点击录入日历，一般会自动更新单子号，我说一般，原因是偶而候更新不行功，再者原因，是因为咱们把查询入库单功能整合在这张表单里，而当咱们查询已有入库单时，会把该单子号的入库日历写到入库单表的入库日历中，也会触发责任表Change事件。咱们通过一个变量blnUpdateOrderNo来纪录是咱们手工录入日历，一经查询入库单时填入日历，若是是前者就触发更新单子号，后者就不更新。偶而候blnUpdateOrderNo的值并不是预期的值。8、已保存入库单查询：咱们点击H列单子号，会自动查询已有单子号，并添加到H3单位格的数据考证，点选一个单子号，则把该单子号的数据查询过来，不错打印责任表，罢了补打入库单的功能。9、咱们建立一个“断根”按钮，不错断根临了一转纪录。10、可能还有一些其他功能，不再细说。

图片

VBA代码

代码详见第二条推文。

跋文：玉蒲团之淫行天下

1、本案例的方针数据库是面前文献，也不错单独建立一个Excel文献看成数据库，若是要改为Access数据库也很简单，虽说不上无缝相接，但也只需要很少的篡改，修改数据库文献与数据表称号即可。2、本案例录入表单是在Excel表中，输入相比简单，但收尾起来有点忙绿，我一经相比倾向于用户窗体。3、默许入库单行数固定不变，莫得探求行数增减的情况。4、由于技术急促中，有一些荒芜情况莫得探求到，可能会有不少报错的情况，有契机再缓缓调度吧。好，今天就到这，咱们下期相逢。~~~~~~End~~~~~~ 本站仅提供存储行状，通盘实质均由用户发布，如发现存害或侵权实质，请点击举报。