¡iÁÉ}ºô¡ÐIT§Þ³N³ø¹D¡j°ÝÃD¡G
1.¦p¦ó¦b³øªí¤¤¨C¹jN¦æÅã¥Ü¤@±ø²Ê½u
2.¦p¦ó¬°³øªí¼W¥[¤@Ӧ渹¦C¡H
¦^µª¡G
¡»1¡B¦b³]p¼Ò¦¡ùØ¥´¶}¸Ó³øªí¡A¦b³øªí¥DÅéùر¥[¤@ÓTextBox¡A§âNameÄݩʧאּInputID¡C
¡»2¡B§âInputIDªº±±¥ó¨Ó·½¡]ControlSource¡^Äݩʳ]¸m¬°=1¡F¦A§âInputIDªº¹B¦æÁ`©M¡]RunningSum¡^Äݩʧאּ¡§¥þ³¡¤§¤W¡¨¡]Over All¡^¡C
ª`·N¡G¦pªG§â³oÓ±±¥óÅã¥Üµ¹¥Î¤á¬Ý¡A§A±N±o¨ì¤@Ó¥H1¬°¨B¶i¦Û°Ê¼Wªøªº¦æ¸¹¦C
¡»3¡B³Ì«á¡A¦b¥DÅ骺®æ¦¡¤Æ¨Æ¥óùØ¿é¤J¦p¤U¥N½X¡G
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If (Me![InputID] Mod 5) = 0 Then
Me![Line19].BorderWidth = 3 '¤À¹j½uªº¦WºÙ¬°Line19
Else
Me![Line19].BorderWidth = 1
End If
End Sub
¡»4¡B¹wÄý³øªí´N¥i¥H¬Ý¨ì³øªí¤W¨C¹j5¦æÅã¥Ü¤@¦æ²Ê½u¡C
¡]³d¥ô½s¿è¡G¿c¥üªL¡^