你的位置:开发一个物联网软件价格 > 联系我们 > 开发一个物联网软件价格 入库单:动态添加数据考证、日历控件、ListBox下拉框弃取录入、记载集对象更新入库明细表【VBA案例】

开发一个物联网软件价格 入库单:动态添加数据考证、日历控件、ListBox下拉框弃取录入、记载集对象更新入库明细表【VBA案例】

发布日期:2024-09-28 09:12    点击次数:95

本色概要

录入、保存入库明细、打印入库单动态添加数据考证日历控件录入日历TextBox搭配ListBox控件,混沌搜索、弃取录入物料明细

全球好,我是冷水沏茶。

前几天在论坛上看到一个乞助贴,好多年昔日的旧贴了:

录入、保存入库明细

诸君坛友周末好:

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

1、票据号:RK+年月日+001(001为票据活水号)--到下一年从零再行计。

2、序号按品号递加

3、点保存后,本笔记载信息(如第二使命表)保存到"汇总入库单记载"

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

5、汇总入库单记载中稀有据的区域自动添加边框。

6、点打印后,本入库单到行底(肃穆东谈主)自动打印。

烦请大神见教,感谢!   

012路比分析:上期开出红球012路比为2:1:3,近十期0路号码开出21次,1路开出20次,2路开出19次, 本期重点关注012路比0:3:3。

 收支库方面的需求已经比拟多的,一直想作念一个进销存、收支库方面的行使,关联词嗅觉使命量比拟大,一直也没无意间与决心去作念。

app

今天这个案例应该属于收支库当中的一小块本色,这两天花了点时间,基本完成一个框架,有点鄙俗,咱们全部来看一下。

1、入库单表,是一个录入数据的模板:

图片

2、入库明细表,保存入库明细数据,我修改了使命表名,删除原表头,把它酿成一个轨范的二维表:

图片

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

图片

还有一些表,除了供应商,其余类别、业务员、仓库王人是我添加的,见识是在录入日库单的时间不错弃取录入。

需求难度不算大,我准备用ADO数据不息来解决查询、添加明细记载等。

想路与功能讲明:

1、在录入入库单的时间,供应商、类别、业务员、仓库王人通过SQL查询对应的表中的记载,添加相应单位格的数据考证,供弃取输入。2、录入商品明细,咱们弃取TextBox+listBox来弃取输入,不错混沌搜索。3、咱们录入完成后,点保存,把数据更新到“入库明细表”中,弃取更新记载集的格式。保存完之后,不错打印使命表,这个莫得写什么代码,径直打印使命表4、点“保存并打印”则保存数据并打印使命表。。5、点新增,把入库单物料数据区域清空,物联网app开发票据号+1。6、点新号,阐明入库日历,刷新为最新的空缺票据号。7、入库日历,咱们把【日历控件】整合进来,点击录入日历,一般会自动更新票据号,我说一般,原因是无意间更新不行功,再者原因,是因为咱们把查询入库单功能整合在这张表单里,而当咱们查询已有入库单时,会把该票据号的入库日历写到入库单表的入库日历中,也会触发使命表Change事件。咱们通过一个变量blnUpdateOrderNo来记载是咱们手工录入日历,已经查询入库单时填入日历,要是是前者就触发更新票据号,后者就不更新。无意间blnUpdateOrderNo的值并不是预期的值。8、已保存入库单查询:咱们点击H列票据号,会自动查询已有票据号,并添加到H3单位格的数据考证,点选一个票据号,则把该票据号的数据查询过来,不错打印使命表,终了补打入库单的功能。9、咱们缔造一个“断根”按钮,不错断根临了一滑记载。10、可能还有一些其他功能,不再细说。

图片

VBA代码

代码详见第二条推文。

跋文:开发一个物联网软件价格

1、本案例的盘算数据库是现时文献,也不错单独缔造一个Excel文献行为数据库,要是要改为Access数据库也很浅薄,虽说不上无缝连络,但也只需要很少的改换,修改数据库文献与数据表称呼即可。2、本案例录入表单是在Excel表中,输入比拟浅薄,但截止起来有点坚苦,我已经比拟倾向于用户窗体。3、默许入库单行数固定不变,莫得商酌行数增减的情况。4、由于时间匆匆,有一些稀奇情况莫得商酌到,可能会有不少报错的情况,有契机再逐步鬈曲吧。好,今天就到这,咱们下期邂逅。~~~~~~End~~~~~~ 本站仅提供存储劳动,悉数本色均由用户发布,如发现存害或侵权本色,请点击举报。