Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:求表达式或代码

1楼
blackzhu 发表于:2008/12/1 12:15:00

 我有一表:
  A表: 色号        规格     进仓日期          进仓数量
           2783      402      2008-11-30    300
           2783      202      2008-11-30    300
           2783      402      2008-12-1      400
           2783      202      2008-12-1      200
           2784      402      2008-11-30    1000
           2784      402      2008-12-1      500

  B表:  色号       规格      库存量
           2783      402       700
           2783      202       500
           2784      402       1500

   B表中想按照:色号和规格输入时将A表中的同一色号和规格的进仓数量相加。    

2楼
blackzhu 发表于:2008/12/1 12:16:00
  我想在A表的进仓数量有变化时,B表同时会有变化。
3楼
blackzhu 发表于:2008/12/1 12:27:00
将规格关联,可以解决!真强。
4楼
czy 发表于:2008/12/1 12:41:00
关联应该以色号和规格多列关联。

代码差不多是这样吧。
DataColChanged事件中设置

If e.DataCol.Name = "色号" OrElse e.DataCol.Name = "规格" Then
    if e.DataRow("色号") = Nothing OrElse e.DataRow("规格") = Nothing
        e.DataRow("库存量") = Nothing
    Else
        e.DataRow("库存量") = DataTables("A表").Compute("Sum(进仓数量)","[色号] = '" & e.DataRow("色号") & "' And [规格] = '" & e.DataRow("规格") & "'")
    End If
End If

 

[此贴子已经被作者于2008-12-1 12:42:02编辑过]
5楼
blackzhu 发表于:2008/12/1 16:41:00
以下是引用czy在2008-12-1 12:41:00的发言:
关联应该以色号和规格多列关联。

代码差不多是这样吧。
DataColChanged事件中设置

If e.DataCol.Name = "色号" OrElse e.DataCol.Name = "规格" Then
    if e.DataRow("色号") = Nothing OrElse e.DataRow("规格") = Nothing
        e.DataRow("库存量") = Nothing
    Else
        e.DataRow("库存量") = DataTables("A表").Compute("Sum(进仓数量)","[色号] = '" & e.DataRow("色号") & "' And [规格] = '" & e.DataRow("规格") & "'")
    End If
End If

 

[此贴子已经被作者于2008-12-1 12:42:02编辑过]

   多列关联可以做到了,谢谢,你的代码收藏!再次谢谢诶!

共5 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02539 s, 2 queries.