我在水晶报表9中想实现这样的功能: 报表中的页眉区域中有 结算区间: ——————至—————— 详细资料区域有数据库中查询得到的数据集,使用“仅字段定义”可以实现详细资料区域的打印,怎么样实现页眉区域的数据打印?结算期间可以在VB中有变量得到,也可以在数据库中有字段得到。怎么办呢?
谢谢
谢谢
解决方案 »
- 求教:大家都用什么软件或布署包来做vb6项目的安装程序??谢谢
- 有A类B类,如何在A类中定义B类的数组属性?
- 如何将以下保存在a.txt的数据取出来?
- 关于如何将dll文件注册到系统中。
- 怎么用VB往IE中嵌入自己的工具条(向google一样的工具条),一定是VB,其他的我看不懂,急急急急急急!!!!
- 关于QQ!!!你会玩QQ吗????
- 一名程序员的情书
- 请教高手,如何把阴历转换为阳历?谢谢!!
- VB编的EXCEL自动保存COM加载宏的问题
- 请教:如何使用ADO连接FoxBase数据库(除ODBC外),连接字符串怎么写???
- 》VB连接Access的方法,和查询Access中的数据集。。。。
- 请教一个光标定位的问题。
在水晶報表parameter fields中增添一個變量
vb中的代碼太致是:
Report.EnableParameterPrompting = False
Report.ParameterFields(1).AddCurrentValue text1.text
rpt.txtdate1.text="2005-10-18"具体的我忘记了,我这没装水晶报表,但就是这么做就可以了的。
mytxt.SetText Format(mytxt.Text, "####年##月##日") '格式化TextBox中的文本显示方式如果是做为参数来查询的话,则要通过参数传递的方法来获取。
第一种设置参数的方式
carp.ParameterFields(1).ClearCurrentValueAndRange
carp.ParameterFields(1).AddCurrentValue ("myhgyp")
carp.ParameterFields(2).ClearCurrentValueAndRange
carp.ParameterFields(2).AddCurrentValue (CInt("3"))
'第二种设置参数的方式
carp.ParameterFields.GetItemByName("gg").ClearCurrentValueAndRange
carp.ParameterFields.GetItemByName("gg").AddCurrentValue ("myh11" & vbCrLf & "-2gyp")
carp.ParameterFields.GetItemByName("ff").ClearCurrentValueAndRange
carp.ParameterFields.GetItemByName("ff").AddCurrentValue (CInt("673"))