ClientHwndクラス FillRectanglesClientメソッド
オブジェクトウインドウ座標で、一連の四角形の内部を塗りつぶします。
使用法
Dim instance As ClientHwnd
Dim br As System.Drawing.Brush  '塗りつぶしの特性を決定するSystem.Drawing.Brush
Dim rects As System.Drawing.Rectangle()	'塗りつぶす四角形を表すRectangle構造体の配列

instance.FillRectanglesClient(pen, rects)
使用例
'ClientHwndクラス FillRectanglesClientメソッド

Imports System.Windows.Forms
Imports System.Drawing

Public Class AddIn

    Public Sub AddIn_Start()
        Dim chw As ClientHwnd = New ClientHwnd()

		Dim rects As Rectangle() = New Rectangle() { _
			 New Rectangle(10, 10, 100, 50) _
			,New Rectangle(40, 50, 100, 50) _
			,New Rectangle(70, 90, 100, 50) _
			,New Rectangle(100, 130, 100, 50) _
			,New Rectangle(130, 170, 100, 50) _
		}
        chw.FillRectanglesClient(Brushes.PaleVioletRed, rects)
    End Sub

End Class
 
 
 
 
このページでお気付きの点がございましたら
ご連絡いただけますと幸いです。
Eメール(任意)
送信内容
 

便利ウェブサイト