'Declaration
Function PaintCell( _
ByVal As PdfGraphics, _
ByVal As RectangleF, _
ByVal As Appearance, _
ByVal As Object, _
ByVal As Boolean, _
ByVal As Boolean, _
ByVal As Single _
) As PrePaintTextResult
'使用法
Dim instance As IPdfPrintableRule
Dim g As PdfGraphics
Dim r As RectangleF
Dim appearance As Appearance
Dim value As Object
Dim isSelected As Boolean
Dim isLocked As Boolean
Dim zoomFactor As Single
Dim value As PrePaintTextResult
value = instance.PaintCell(g, r, appearance, value, isSelected, isLocked, zoomFactor)