Report.Line 方法 (Access)

當Print事件發生時，Line方法會在Report物件上繪製線條和矩形。

語法

運算式。Line (Step (x1， y1) - Step (x2， y2) ， Color， BF)

需要 expression。 代表 Report 物件的變數。 可傳回 [套用至] 清單內其中一個物件的運算式。

參數

名稱	資料類型	描述
步驟	關鍵字	表示起始點座標相對於Object引數之CurrentX和CurrentY屬性的目前設定所指定的目前圖形位置。
x1， y1	Single	表示線條或矩形的起點座標。 Scale 引數所指定之Report 物件的Scale 屬性 (ScaleMode、ScaleLeft、ScaleTop、ScaleHeight和ScaleWidth) 會決定所使用的量值單位。 如果省略這個引數，則行會從 CurrentX 和 CurrentY 屬性所指示的位置開始。
x2， y2	Single	此為必要動作。 表示線條或矩形的結束點座標。 請確定起點和終點是以連字號 (分隔 - ) 。
Color	Long	表示用來繪製線條的 RGB (紅-綠-藍) 色彩。 如果省略此引數，則會使用 ForeColor 屬性的值。 您也可以使用 RGB 函數或 QBColor 函數來指定色彩。
B		使用座標做為矩形相反角落來建立矩形的選項。
F		F 無法在沒有 B的情況下使用。如果使用 B 選項， F 選項會指定矩形填入用來繪製矩形的相同色彩。 如果僅使用 B 而未使用 F，則會以 FillColor 和 BackStyle 屬性之目前設定所指定的色彩填滿矩形。 BackStyle 屬性的矩形和線條預設值為 [一般]。

註解

只有在報表區段的 OnPrint 或 OnFormat 事件屬性所指定的事件程序或宏中，或報表的 OnPage 事件屬性中，才使用這個方法。

若要連接兩條繪圖線，請確定其中一條繪圖線是從上一個線條的結束點開始。

繪製的線條寬度取決於 DrawWidth 屬性設定。 在背景繪製線條或矩形的方式取決於 DrawMode 和 DrawStyle 屬性的設定。

當您套用 Line 方法時， CurrentX 和 CurrentY 屬性會重新設定為 x2 和 y2 引數所指定的結束點。

範例

下列範例使用 Line 方法，在名為 EmployeeReport的報表邊緣內繪製五個圖元的紅色矩形。 RGB 函數用來將線條標示為紅色。

若要在 Microsoft Access 中嘗試此範例，請建立名為 EmployeeReport的新報表。 在報表模組的 [宣告] 區段中貼上下列程式碼，然後切換至 [預覽列印]。

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) 
    ' Call the Drawline procedure 
    DrawLine 
End Sub 
 
Sub DrawLine() 
    Dim rpt As Report, lngColor As Long 
    Dim sngTop As Single, sngLeft As Single 
    Dim sngWidth As Single, sngHeight As Single 
 
    Set rpt = Reports!EmployeeReport 
    ' Set scale to pixels. 
    rpt.ScaleMode = 3 
    ' Top inside edge. 
    sngTop = rpt.ScaleTop + 5 
    ' Left inside edge. 
    sngLeft = rpt.ScaleLeft + 5 
    ' Width inside edge. 
    sngWidth = rpt.ScaleWidth - 10 
    ' Height inside edge. 
    sngHeight = rpt.ScaleHeight - 10 
    ' Make color red. 
    lngColor = RGB(255,0,0) 
    ' Draw line as a box. 
    rpt.Line(sngTop, sngLeft) - (sngWidth, sngHeight), lngColor, B 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。