Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-视频教程

17《用Access分析数据》视频教程

时 间:2020-07-30 11:39:52
作 者:张志   ID:8  城市:上海  QQ:2851379730点击这里给张志发消息
摘 要:《用Access分析数据》第17课 有缺口的物料分配库存
正 文:

一、课程介绍:

 ▲ 之前完成【tbl未领完物料明细】表,并写入了相应的数值,即掌握了未领完物料清单中所有物料的库存、到货、采购、请购数量,是不是物料有缺口,就只需要判断这个表中有没有相应的数值即可。库存分配要点:
    1.按投料单的顺序(即优先分配)对库存进行分配;
    2.只需要对物料缺口为Null值的记录进行分配(表中4千多记录,有缺口的才1百多条,涉及效率问题);
    3.已分配过的,要在【库存已分配】中写入数值,当下一次遇到同样的物料需要分配库存时,才知道库存还余下多少没有分配的数量;
    4.当分配后满足了物料的缺口时,要在【缺口数量】中写入0,即不再是Null值

 ▲ 用DAO结合循环语句来分配库存量:
 Private Sub fpkc()
    Dim rst As DAO.Recordset
    Dim strSQL As String '声明一个文本型的变量
    strSQL = "SQL代码"
    Set rst = CurrentDb.OpenRecordset(strSQL, 2) '打开记录集,相当于打开一个表
    rst.MoveFirst '移到第1条记录
    Do Until rst.EOF '循环语句
        rst.Edit '允许编辑记录
        rst!库存数量 = 某个值
        rst.Update '更新值
        rst.MoveNext '移到下一条记录
    Loop
    rst.Close '关闭记录集
    Set rst = Nothing '释放对象
 End Sub

二、扫码听课:

三、电脑学习:

    请点击网址:https://m.qlchat.com/wechat/page/live/840000166145996 (点开后需要用微信扫描登录)



Access软件网QQ交流群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助