关于水晶报表的一个小问题,验证后送50分.

bird_cai 2002-04-02 11:33:42

控件:combo1,crystalreport1,command1，dbgrid。
使用access数据库，combo1中的List为红色、黄色、绿色。
代码：privet sub command1（）
CrystalReport1.ReportFileName="E:\js.rpt"
CrystalReport1.SelectionFormuia="{车牌号.颜色}=" & combo1.text
CrystalReport1.Action=1
end sub
问题: 运行后提示错误: error in formula 作各种尝试均告失败,求解.

...全文

52 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

bird_cai 2002-04-03

打赏
举报

我另外发帖了,谢谢!

wangsitao 2002-04-02

打赏
举报

试试这个
CrystalReport1.SelectionFormuia="{车牌号.颜色}=" & "'" &combo1.text & "'"
或这个
CrystalReport1.SelectionFormuia="'" & "{车牌号.颜色}=" &combo1.text & "'"

gxh 2002-04-02

打赏
举报

CrystalReport1.SelectionFormuia="{车牌号.颜色}='" & combo1.text & "'"

kalling 2002-04-02

打赏
举报

error in formula 好像有很多种情况的，能不能把错误代码写完整？

bird_cai 2002-04-02

打赏
举报

感谢楼上!可是错误依然如旧.请大家帮忙了!!!

acptvb 2002-04-02

打赏
举报

感谢您使用微软产品。

这个问题可能是由于formula字符串中有回车（carriage return）。请尝试以下代码：

strText = Combo1.Text
'Strip the carriage return and replace with Chr(10)
newText = Replace(strText, Chr(13), "' + Chr(10) + '")
'Strip the Carriage return and replace with an empty string
newText = Replace(newText, Chr(10), "")

希望以上建议能够对您有所帮助。

- 微软全球技术中心 VB技术支持

本贴子以“现状”提供且没有任何担保，同时也没有授予任何权利。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。
为了为您创建更好的讨论环境，请参加我们的用户满意度调查(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。

bird_cai 2002-04-02