Foxtable(狐表)用户栏目专家坐堂 → combolist


  共有2466人关注过本帖平板打印复制链接

主题:combolist

帅哥哟,离线,有人找我吗?
zaq3574020
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:203 积分:1728 威望:0 精华:0 注册:2018/8/23 14:16:00
combolist  发帖心情 Post By:2020/1/15 9:37:00 [只看该作者]

For Each drs As DataRow In DataTables("滞销品调度").Select(Filter)
    For Each ck As String In DataTables("销售款号统计").GetValues("仓库","款号='" & drs("款号") & "' And 花色码='" & drs("花色码") & "' and 尺码码 = '" & drs("尺码码") & "'","数量 desc")
        If DataTables("销售统计").Find("仓库='"& ck &"'") IsNot Nothing Then
            If DataTables("库存表").Compute("sum(数量)","款号='" & drs("款号") & "' And 花色='" & drs("花色") & "' and 尺码 = '" & drs("尺码") & "' and 仓库='" & ck & "'") <= 0 Then
                drs("可调入仓库")=drs("可调入仓库") & "|" & ck
            End If
        End If
    Next   
Next

drs("可调入仓库")=drs("可调入仓库") & "|" & ck 有没有办法变成下拉列表combolist需要的数据,还有就是这个循环 有没有其他更有效率的写法,怎么写

 回到顶部