以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何实现一个点击单元格打开一个表进行选择输入  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=56544)

--  作者:宝宝贝贝
--  发布时间:2014/9/8 15:58:00
--  如何实现一个点击单元格打开一个表进行选择输入

我做的是一个标签系统.

其中一个表是客户订单SC,另外表是根据装箱情况做出来的箱子数据CTN及箱子里装的具体的产品PACKING_DETAILS.

现在我已经设计了一个窗口,在这个窗口里面,仓库人员可以根据箱子尺寸及产品信息录入.

但是我想在录入产品信息的时候,点击单元格能够出现一个表格,表格里面出现的是该票外销合同的订单数量-已经做好标签的产品数量,即是该票订单未做标签的产品.

这个表格我开始想在PACKING_DETAILS里面用CELLBUTTONCLICK输入查询表生成器的代码.即点CODE单元格能跳出表格,但是说查询表成生的代码里面没有,老是报错.

我又想在窗口里面做一个按扭,做查询表,又说里面的查询表代码不能用,报错.

基本代码如下

If e.Col.Name = "CODE" Then
    Dim jb As New SQLJoinTableBuilder ("统计表1","PACKING_DETAILS")
    Dim Cols1() As String = {"DZNO","CODE"}
    Dim Cols2() As String = {"SCNO","CODE"}
    jb.AddTable ("PACKING_DETAILS", Cols1, "SC",Cols2)
    AddCols("SCNO", "{SCNO}.CODE", "中文品名","SIZE","单位")
    jb.AddEep("剩余标签", "{SC}.QTY-Compute("SUM({Packing_Details}.QTY")","CODE = \'" & e.DataRow("CODE") & "\'"
    jb.Build()
    MainTable = Tables ("统计表1")
End If
   

请问这个功能应该怎么实现呢?

 


--  作者:y2287958
--  发布时间:2014/9/8 16:08:00
--  
http://www.foxtable.com/help/topics/1534.htm