标题：合并模式

1楼

wqc360 发表于：2009/12/3 11:08:00

请问怎样在窗口关联表显示合并模式

2楼

狐狸爸爸 发表于：2009/12/3 11:09:00

用代码。

Table不管是在那里，代码都是一样的，不同的只是名称

3楼

wqc360 发表于：2009/12/3 11:16:00

怎么用代码，谢谢

4楼

yangming 发表于：2009/12/3 11:23:00

给你个示例,将表中的订单改成窗口表的名称,列名改成你表中的列名称试试

示例

下面的代码合并订单表中的客户、雇员两列，因为是标准合并模式，请在执行之前，将客户、雇员两列移到最左边。
完整的合并模式设置代码：

With Tables("订单")
    .Redraw = False '暂停绘制表
    .MergeMode = MergeModeEnum.Standard '标准合并模式
    .MergeCols.Clear() '清除原来的合并列
    .MergeCols.Add("客户") '加入要合并的列
    .MergeCols.Add("雇员")
    .MergeSort = "客户,雇员" '设置合并模式下的排序方式
    .AllowMerge = True '启用合并模式
    .Redraw = True '重新绘制表
End With

5楼

wqc360 发表于：2009/12/3 20:39:00

我有产品目录表主窗口，窗口中有两个关联表，类型=Normal，作为副本=False，一下合并模式代码我放在窗口AfterLoad事件中，项目LoadUserSetting事件中，指令打开窗口按钮Click事件中，都失败，请看看应该怎么做，谢谢
With Tables("产品目录.产品工序")
    .Redraw = False
    .MergeMode = MergeModeEnum.Standard
    .MergeCols.Clear()
    .MergeCols.Add("图号")
    .MergeCols.Add("名称")
    .MergeSort = "图号,名称"
    .AllowMerge = True
    .Redraw = True
End With
With Tables("产品目录.产品工序.产品工艺")
    .Redraw = False
    .MergeMode = MergeModeEnum.Standard
    .MergeCols.Clear()
    .MergeCols.Add("图号")
    .MergeCols.Add("名称")
    .MergeSort = "图号,名称"
    .AllowMerge = True
    .Redraw = True
End With

6楼

wqc360 发表于：2009/12/4 15:27:00

请帮忙看一下，谢谢

7楼

yangming 发表于：2009/12/4 16:37:00

以下是引用wqc360在2009-12-4 15:27:00的发言：
请帮忙看一下，谢谢

上传相关文件才好看啊

8楼

wqc360 发表于：2009/12/4 17:09:00

下载信息 [文件大小：下载次数： ]
点击浏览该文件:佶龙机加二车间管理系统.rar

9楼

wqc360 发表于：2009/12/4 17:09:00

密码060425

10楼

yangming 发表于：2009/12/4 17:29:00

楼主是开发版做的吧,我打不开啊,我是商业版

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