ActiveReports 的显示问题

错误显示：


正确显示应该是：


请教一下这个[?]为啥会显示成框框

我注意到蓝框中的【.】显示正常，不知这两个点有什么却别吗，能否将你的报表发给我调试一下，以确定是特殊字符显示的问题或者是其它原因

你这两个是不同的字体吧，同一个字符在不同的字体中的显示可能是不一样的。
这个字符看上去是一个非常用的字符或用户自定义的字符，通常的字体中可能未定义这个字符，会使用其特定的字形来表示，比如框，或者点。
以上是猜测，仅供参考。

回复 3楼Noel的帖子

Noel

看来你的确有很丰富的报表开发经验

哦，这个问题已经解决了，确实是两个点在数据库中不一样导致的。
再请教个问题，如何让一张帐票在没有数据时，repeattofill为true，有数据时repeattofill为false，怎样能知道detail中有无数据

报表有一个NoData事件，不知是不是你想要的结果。

如果报表Detail没有数据就是一个空报表，不显示Detail中的任何信息。

通过NoData事件是解决了上面这个问题，可是又引出了另外一个问题，如下图所示，我在帐票中第一列设的底线是只有在第15行和一组group的最后一行才显示，可是从下图来看，现在都是空白的情况下第一组group出现14条数据，所以出现了两条线，还有个问题就是在2页就只显示了表头，这个问题实在是调不好了，麻烦大哥给看看，正确的情况就只应该显示一页。






帐票模板如下：



还请收到后将模板删除，谢谢

我调整了GroupFooter1和PageFooter1的高度，并设置以下属性
GroupFooter1.CanShrink = true
PageFooter1.CanShrink = true

得到这样的效果，你看是否你需要的

大哥，这样的话，行数成14行了，我们这边要求是15行，另外，能不能将我那个模板给屏蔽掉，谢谢。

在你7楼Demo的基础上设置 ReportFooter1.Height = 0，并将以下代码覆盖报表的去全部后台代码：

1. Imports GrapeCity.ActiveReports
   
2. Imports GrapeCity.ActiveReports.Document
   
3. 
   
4. Public Class f105整合性チェックリスト
   
5. 
   
6.     Dim RowNo As Integer = 1
   
7.     Dim NoDataRowNo As Integer = -1
   
8. 
   
9.     Private Sub Detail1_Format(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Detail1.Format
   
10.         If ((RowNo Mod 15) = 0) Then
    
11.             TextBox1.Border.BottomColor = Color.Black
    
12.             TextBox1.Border.BottomStyle = GrapeCity.ActiveReports.BorderLineStyle.Solid
    
13.         Else
    
14.             TextBox1.Border.BottomStyle = GrapeCity.ActiveReports.BorderLineStyle.None
    
15.         End If
    
16.         RowNo = RowNo + 1
    
17. 
    
18.         If NoDataRowNo > -1 Then
    
19.             For Each item As GrapeCity.ActiveReports.SectionReportModel.ARControl In Me.Detail1.Controls
    
20.                 If TypeOf item Is GrapeCity.ActiveReports.SectionReportModel.TextBox Then
    
21.                     TryCast(item, GrapeCity.ActiveReports.SectionReportModel.TextBox).Value = ""
    
22.                 End If
    
23.             Next
    
24.         End If
    
25. 
    
26.     End Sub
    
27. 
    
28.     Private Sub f105整合性チェックリスト_FetchData(sender As Object, eArgs As GrapeCity.ActiveReports.SectionReport.FetchEventArgs) Handles Me.FetchData
    
29.         If NoDataRowNo = -1 AndAlso eArgs.EOF = True Then
    
30.             NoDataRowNo = 0
    
31.             eArgs.EOF = False
    
32.         End If
    
33. 
    
34.         If NoDataRowNo > -1 Then
    
35.             If NoDataRowNo < 15 Then
    
36. 
    
37.                 NoDataRowNo = NoDataRowNo + 1
    
38.                 eArgs.EOF = False
    
39.             Else
    
40.                 eArgs.EOF = True
    
41.             End If
    
42.         End If
    
43.     End Sub
    
44. End Class
    

复制代码