主题：报表问题，应为两位数98 只显示了十位数9

此主题相关图片如下：l5ys71}v0j7}1mpyzrec_re.jpg

报表出错 

成绩栏  应为两位数  98  只显示了十位数 9

请指教！！！

 呃……提示什么错误？你的项目，你的代码怎样的？

没有提示错误

 

不好意思！！！

报表没有问题，转换成word格式保存时出现的问题。

Dim t As Table = e.Form.Name & "_Table2"

Vars("要排序的表名") = t

If forms("排序").opened Then
    forms("排序").close()
Else
    forms("排序").Open()
End If

 

 

以上代码在菜单的快速访问栏中设置时报错。

此主题相关图片如下：1iredi(0zuvo1sa{lsqhd0c.jpg

 

dim t as table = tables("某某窗口_table2"）

请专家指点三楼所述报表存为word文档所出的问题。我是直接从报表预览中转存的，如能用代码解决更好，请告知。先谢了！！！

楼主，我保存正常的。因为保存的时候，是docx的格式，得看看你的word是否是2007以上的版本了。

如果是2003的话，保存成.rtf格式试试。

 

Dim t As Table = e.Form.Name & "_Table2"

Vars("要排序的表名") = t

If forms("排序").opened Then
forms("排序").close()
Else
forms("排序").Open()
End If

以上代码在菜单的快速访问栏中设置时报错

我的想法是  排序 能针对当前窗口的 "_Table2"，打开任意窗口，都能对窗口的 "_Table2"进行排序。

 弄错了吧，vars不能保存table变量的，只能保存字符串。

Vars("要排序的表名") = e.Form.Name & "_Table2"

If forms("排序").opened Then
forms("排序").close()
Else
forms("排序").Open()
End If