以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 报表问题,应为两位数98 只显示了十位数9 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=28501)
|
-- 作者:wsxdwh
-- 发布时间:2013/1/31 12:19:00
-- 报表问题,应为两位数98 只显示了十位数9
此主题相关图片如下:l5ys71}v0j7}1mpyzrec_re.jpg
 报表出错
成绩栏 应为两位数 98 只显示了十位数 9
请指教!!!
|
-- 作者:lin_hailun
-- 发布时间:2013/1/31 15:01:00
--
呃……提示什么错误?你的项目,你的代码怎样的?
|
-- 作者:wsxdwh
-- 发布时间:2013/1/31 15:57:00
--
没有提示错误
不好意思!!!
报表没有问题,转换成word格式保存时出现的问题。
|
-- 作者:wsxdwh
-- 发布时间:2013/1/31 16:01:00
--
Dim t As Table = e.Form.Name & "_Table2"
Vars("要排序的表名") = t
If forms("排序").opened Then forms("排序").close() Else forms("排序").Open() End If
以上代码在菜单的快速访问栏中设置时报错。
|
-- 作者:wsxdwh
-- 发布时间:2013/1/31 16:02:00
--
此主题相关图片如下:1iredi(0zuvo1sa{lsqhd0c.jpg

|
-- 作者:程兴刚
-- 发布时间:2013/1/31 16:25:00
--
以下是引用wsxdwh在2013-1-31 16:02:00的发言: 此主题相关图片如下:1iredi(0zuvo1sa{lsqhd0c.jpg 
dim t as table = tables("某某窗口_table2")
|
-- 作者:wsxdwh
-- 发布时间:2013/1/31 22:08:00
--
请专家指点三楼所述报表存为word文档所出的问题。我是直接从报表预览中转存的,如能用代码解决更好,请告知。先谢了!!!
|
-- 作者:lin_hailun
-- 发布时间:2013/2/1 8:53:00
--
以下是引用wsxdwh在2013-1-31 22:08:00的发言:
请专家指点三楼所述报表存为word文档所出的问题。我是直接从报表预览中转存的,如能用代码解决更好,请告知。先谢了!!!
楼主,我保存正常的。因为保存的时候,是docx的格式,得看看你的word是否是2007以上的版本了。
如果是2003的话,保存成.rtf格式试试。
|
-- 作者:wsxdwh
-- 发布时间:2013/2/1 14:36:00
--
Dim t As Table = e.Form.Name & "_Table2"
Vars("要排序的表名") = t
If forms("排序").opened Then forms("排序").close() Else forms("排序").Open() End If
以上代码在菜单的快速访问栏中设置时报错
我的想法是 排序 能针对当前窗口的 "_Table2",打开任意窗口,都能对窗口的 "_Table2"进行排序。
|
-- 作者:lin_hailun
-- 发布时间:2013/2/1 14:38:00
--
弄错了吧,vars不能保存table变量的,只能保存字符串。
Vars("要排序的表名") = e.Form.Name & "_Table2"
If forms("排序").opened Then forms("排序").close() Else forms("排序").Open() End If
|