以文本方式查看主题

-  易表在线答疑  (http://www.egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://www.egrid2000.com/dvbbs/list.asp?boardid=2)
----  [求助]打印问题  (http://www.egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=10294)

--  作者:paradise2008
--  发布时间:2007/11/11 22:03:00
--  [求助]打印问题
打印时明细能打印出来吗?

--  作者:Czy
--  发布时间:2007/11/11 22:08:00
--  
只能用报表打印出明细列的内容。
在报表中打印明细表的内容可以看一下这里:

http://bbs.egridsoft.com/chs/chm/printsubgrid.htm


--  作者:易中天
--  发布时间:2008/4/8 16:10:00
--  [求助]列数据如何在它表中转为行数据?
问:如何把表1数据按表2排列格式传过去?,表2中的公式该如何写,才能达到目的?十分感谢你的帮助!egd文件下载
--  作者:wjq1072
--  发布时间:2008/4/8 16:17:00
--  
拿前辈做的一个作品给你参考吧!
egd文件下载
--  作者:易中天
--  发布时间:2008/4/8 16:38:00
--  
哪儿来的?太妙了!可能我学不会,这一大堆公式:
DelFor(Grid,"项目","=","")And eval("CreateGrid(""正转换中,请稍候..."","""+Substitute(ListCols("行列互转"),"|",""",0,""")+""",0)") And CopyRows(Grids) And DelFor(Grids,1, "=" ,"")And SetVariable("%A%",ListFor(Grid,"项目")) And SetVariable("%C%",ListCols(Grid)) And SetVariable("%E%",Rows) And SetVariable("%F%",Cols-1) And eval("RenameCol("+Substitute(Substitute(Mid([%so%],0,Search("|",Substitute([%so%],"|","#",min([%E%],[%F%])))),"|",",1)) And RenameCol("),"&",",cell(")+"))")and If([%F%]>[%E%],eval(mid(Rept("And DeleteCol(Cols)",[%F%]-[%E%]),4)) And AddRows(Grid,[%F%]-[%E%]), eval("AddCol("""+ Substitute(Mid([%A%],Search("|",Substitute([%A%]+"|&","|","/",[%F%]-1))+1),"|",""",0, True )And AddCol(""")+""",0,True)") And eval(mid(Rept("And DelRow(Grid,Rows)",[%E%]-[%F%]),4)))And EvalFor(Grid,1,"Split([%C%],""|"",Row+1)") And eval("EvalFor(Grid,"+Substitute(Substitute(Mid([%si%],0,Search("|",Substitute([%si%],"|","%",Cols- 2))),"|","-1,Row+1,Grids)"")And EvalFor(Grid,"),"&",",""cell(")+"-1,Row+1,Grids)"")") And Select(Rows,1,Rows,Cols) And Do(92) And Do(92)And Last()And RemoveGrid(Grids)

谢谢你!


--  作者:tzszw
--  发布时间:2008/4/8 22:08:00
--  
这个是YBIL先生的作品,绝对精品啊!
--  作者:易中天
--  发布时间:2008/4/8 22:36:00
--  
好是好,就是不对路
--  作者:wjq1072
--  发布时间:2008/4/9 7:56:00
--  
自己的路只有自己创!