主题：窗口问题

上传具体实例发上来测试。

1、3

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:租赁站.table

2、不清楚你表达的意思，请截图说明如何操作，最后得到什么结果。

dropdownopened事件，写代码

Dim txt As String = e.Form.DropDownBox.Text
Dim tbl As Table = Tables("收货单下拉_Table1")

Dim g As New GroupTableBuilder("统计表1", DataTables("发货明细表"))
g.Groups.AddDef("日期", DateGroupEnum.none)
'g.Groups.AddDef("日期", "月")
g.Groups.AddDef("发货单号")
g.Groups.AddDef("名称")
g.Groups.AddDef("规格")
g.Groups.AddDef("客户")
g.Groups.AddDef("单位")
g.Groups.AddDef("单价")
g.Totals.AddDef("发货数量", "发货数量")
g.Totals.AddDef("在租数量", "在租数量")
tbl.DataSource = g.BuildDataSource

Dim kh As String = e.Form.DropDownBox.Form.controls("dropbox1").text
If txt = "" Then
    tbl.Filter = "在租数量 > 0 and 客户 like '%" & kh & "%'"
Else
    txt = "'%" & txt & "%'"
    tbl.Filter = "在租数量 > 0 and 客户 like '%" & kh & "%' and (发货单号 Like " & txt & " Or 客户 Like " & txt & " Or 名称 Like " & txt & " Or 规格 Like " & txt & ")"
End If
e.Form.DropDownBox.Select()

1、你可以做一个按钮删除不需要的行，如

currentTable.current.delete

2、父表datacolchanged事件

Select Case e.DataCol.name
    Case "日期","收货单号"
        DataTables("收货明细表").DataCols("日期_发货").RaiseDataColChanged("收货单号='" & e.DataRow("收货单号") & "'")
End Select

3、不是叫你分组统计了？看10楼

4、参考 http://www.foxtable.com/webhelp/scr/0633.htm