以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  报表问题,应为两位数98 只显示了十位数9  (http://www.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