'Declaration
Sub Paint( _
ByVal As Graphics, _
ByVal As Integer, _
ByVal As Integer, _
ByVal As Integer, _
ByVal As Integer, _
ByVal As Boolean _
)
'使用法
Dim instance As IBorder2
Dim g As Graphics
Dim x As Integer
Dim y As Integer
Dim width As Integer
Dim height As Integer
Dim rightToLeft As Boolean
instance.Paint(g, x, y, width, height, rightToLeft)