水晶报表制作说明.docVIP

BS报表制作向导 制作报表样式 新建水晶报表样式 打开Visual Studio或水晶报表工具，点击菜单条中的文件—新建项目，在弹出的页面中选择其他语言-Visual J#-Crystal Reports应用程序 修改名称和位置后，点击确定按钮，再在弹出的页面中 选择作为空白报表，再点击确定按钮； 如果已有一个水晶报表，要在现有项中再新增一个水晶报表样式，可以在解决方案资源管理器中 在解决方案子主目录下，右键-添加新项，弹出以下页面，选择Crystal报表即可 水晶报表工具Crystal Reports2008制作报表： 工具栏 文件-新建-空白报表/标准报表/交叉报表 -数据库专家 将报表数据源绑定数据库 在显示的页面中，单击鼠标右键 选择数据库-数据库专家 在创建新连接中，点击OLE DB（ADO），弹出页面，提供程序中选择Microsoft OLE DB Provide for SQL Server，再点击下一步按钮，在弹出的页面中 输入内容后，点击下一步按钮 在弹出的页面中点击添加命令，输入SQL查询—报表所需字段（也可以是视图或存储过程），再点击确定按钮。 制作水晶报表 工具箱--在左边工具箱中,可以选择工具画报表，文本对象（文本框及内容的输入），线条对象（画线），框对象（表格外面的框） 水晶报表工具Crystal Reports2008： 工具栏 插入-文本对象/线/框 字段--在字段中可以直接将要显示在报表中的字段拖放到报表中去 合计的显示—选中要合计的字段，如金额，点击右键，插入-汇总 在弹出的页面中，选择要汇总的字段和方式（求和，差，平均~~） 点击确定后自动生成一个汇总字段，将该字段拖放到合计金额的位置即可 水晶报表工具Crystal Reports2008： 在“公式字段”新建“合计”，汇总字段为CalFee，拖动到页脚 合计金额小写转换成大写—在右边字段中，选择公式字段，右键-新增（名为test），点击使用专家按钮，在弹出的页面中，选择报表自定义函数，再点击右键-新建，在弹出的页面中输入自定义函数有的名称（AmountToWord2），点击使用编辑器 在下面的输入框中，输入以下函数（语法选择Basic语法） 选择之前添加的公式字段test，在下面的输入框中输入以下内容（调用上面的函数）（语法选择Basic语法） Function CNMoney(ls As Number) As String Dim dx_sz As String Dim dx_dw As String Dim str_int As String Dim str_dec As String Dim dx_str As String Dim fu As String Dim a As String Dim b As String Dim c As String Dim d As String Dim b2 As String Dim num_int As Number Dim num_dec As Number Dim len_int As Number Dim i As Number Dim a_int As Number Dim pp As Number dx_sz = 零壹贰叁肆伍陆柒捌玖 dx_dw = 万仟佰拾亿仟佰拾万仟佰拾圆 If ls = 0 Then CNMoney = 零圆整 Exit Function End If If ls 0 Then ls = Abs(ls) --返回绝对值 fu = 负 Else fu = End If dx_str = CStr(ls) --返回表达式，该表达式已被转换为 String 子类型的 Variant Dim MyDouble, MyString --MyDouble = 437.324 - MyDouble 是双精度值。 MyString = CStr(MyDouble) - MyString 包含 437.324。 返回一个字符串，该字符串中指定的子字符串被替换成另一子字符串，并且替换发生的次数是指定的。 dx_str = Replace(dx_str, ,, ) If (ls = 0) And (ls 1) Then dx_str = 0 + dx_str pp = InStr