1、在設(shè)計模式里打開該報表,在報表主體里面加一個TextBox,把Name屬性改為InputID。
2、把InputID的控件來源(ControlSource)屬性設(shè)置為=1;再把InputID的運(yùn)行總和(RunningSum)屬性改為“全部之上”(Over All)。
Examda提示:如果把這個控件顯示給用戶看,你將得到一個以1為步進(jìn)自動增長的行號列
3、最后,在主體的格式化事件里輸入如下代碼:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If (Me![InputID] Mod 5) = 0 Then
Me![Line19].BorderWidth = 3 @#分隔線的名稱為Line19
Else
Me![Line19].BorderWidth = 1
End If
End Sub
預(yù)覽報表就可以看到報表上每隔5行顯示一行粗線。
2、把InputID的控件來源(ControlSource)屬性設(shè)置為=1;再把InputID的運(yùn)行總和(RunningSum)屬性改為“全部之上”(Over All)。
Examda提示:如果把這個控件顯示給用戶看,你將得到一個以1為步進(jìn)自動增長的行號列
3、最后,在主體的格式化事件里輸入如下代碼:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If (Me![InputID] Mod 5) = 0 Then
Me![Line19].BorderWidth = 3 @#分隔線的名稱為Line19
Else
Me![Line19].BorderWidth = 1
End If
End Sub
預(yù)覽報表就可以看到報表上每隔5行顯示一行粗線。