度量快速开发平台中网格部件中的单元格,在合并的时候触发,根据实现代码的内容来判断哪些单元格可以合并,哪些单元格不能合并。注意:要启用单元格合并事件,需要先设置网格部件的属性“允许单元格合并”;勾上后表示网格中所有字段、只要值相同的行,都自动合并。因此,我们一般是在单元格合并事件中设置哪些条件不合并。
成都创新互联秉承实现全网价值营销的理念,以专业定制企业官网,成都做网站、成都网站制作、成都外贸网站建设,微信小程序,网页设计制作,移动网站建设,网络营销推广帮助传统企业实现“互联网+”转型升级专业定制企业官网,公司注重人才、技术和管理,汇聚了一批优秀的互联网技术人才,对客户都以感恩的心态奉献自己的专业和所长。该事件需要使用事件参数,Me.GetEventArgs()。事件参数共有五个值,如下所示
dim e1=Me.GetEventArgs()
e1.FieldName:合并事件中的列名称,那一个字段需要进行控制;
e1.Value1:字段的第一个值(用于判断该字段各行的值);
e1.Value2:字段的下一个值(用于判断该字段各行的值);
e1.ReturnValue:是否合并的标志,为true表示合并,为false表示不合并;
e1.Handled:系统保留值,设置为true
示例:
本示例是设置区域中客户的相关信息,把相同区域,相同等级的客户类型显示合并起来。
'网格部件1 的 单元格合并事件 事件代码: dim e1=Me.GetEventArgs() '客户等级与客户类型这两个字段,有些相同的值不允许合并,因为需要看前一个字段是否相同判断 if e1.FieldName="客户等级" or e1.FieldName="客户类型" then if 网格部件1.GetFieldValueByRowHandle(e1.Value1,"所在片区") <>网格部件1.GetFieldValueByRowHandle(e1.Value2,"所在片区") then '所在片区不相等的,即使客户等级或者客户类型相等,也不合并 e1.ReturnValue=false e1.Handled=true end if if e1.FieldName="客户类型" then if 网格部件1.GetFieldValueByRowHandle(e1.Value1," 客户等级") <>网格部件1.GetFieldValueByRowHandle(e1.Value2," 客户等级") then '客户等级不相等的,客户类型相等,也不合并 e1.ReturnValue=false e1.Handled=true end if end if end if
效果:
注意下面客户类型为其他的,因为前面客户等级不同,所以没有合并。
这样就简单实现了自定义单元格的合并。
原帖地址:http://bbs.delit.cn/thread-106-1-1.html
另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。
售后响应及时
7×24小时客服热线数据备份
更安全、更高效、更稳定价格公道精准
项目经理精准报价不弄虚作假合作无风险
重合同讲信誉,无效全额退款