ClientHwndクラス DrawRectangleClientメソッド
オブジェクトウインドウ座標で、四角形を描画します。
使用法
Dim instance As ClientHwnd
Dim pen As System.Drawing.Pen '線の色、幅、およびスタイルを決定する
Dim rect As System.Drawing.Rectangle '描画する四角形を表すRectangle構造体
'Overloads
instance.DrawRectangleClient(pen, rect)
Dim instance As ClientHwnd
Dim pen As System.Drawing.Pen '線の色、幅、およびスタイルを決定する
Dim x As Integer '描画する四角形の左上隅のX座標
Dim y As Integer '描画する四角形の左上隅のY座標
Dim width As Integer '描画する四角形の幅
Dim height As Integer '描画する四角形の高さ
'Overloads
instance.DrawRectangleClient(pen, x, y, width, height)
使用例
'ClientHwndクラス DrawRectangleClientメソッド
Imports System.Windows.Forms
Imports System.Drawing
Public Class AddIn
Public Sub AddIn_Start()
Dim chw As ClientHwnd = New ClientHwnd()
Dim pen As Pen = Pens.MediumBlue
Dim rect As Rectangle = New Rectangle(20, 70, 500, 200)
chw.DrawRectangleClient(pen, rect)
pen = New Pen(Color.IndianRed, 5)
chw.DrawRectangleClient(pen, 200, 100, 300, 70)
pen.Dispose()
End Sub
End Class