Dim instance As ClientHwnd Dim br As System.Drawing.Brush '塗りつぶしの特性を決定するSystem.Drawing.Brush Dim rect As System.Drawing.Rectangle '楕円の境界を定義するRectangle構造体 'Overloads instance.FillEllipseClient(pen, rect)
Dim instance As ClientHwnd Dim br As System.Drawing.Brush '塗りつぶしの特性を決定するSystem.Drawing.Brush Dim x As Integer '楕円を定義する外接する四角形の左上隅のX座標 Dim y As Integer '楕円を定義する外接する四角形の左上隅のY座標 Dim width As Integer '楕円を定義する外接する四角形の幅 Dim height As Integer '楕円を定義する外接する四角形の高さ 'Overloads instance.FillEllipseClient(pen, x, y, width, height)
'ClientHwndクラス FillEllipseClientメソッド Imports System.Windows.Forms Imports System.Drawing Public Class AddIn Public Sub AddIn_Start() Dim chw As ClientHwnd = New ClientHwnd() chw.FillEllipseClient(Brushes.OrangeRed, New Rectangle(20, 70, 500, 200)) chw.FillEllipseClient(Brushes.RoyalBlue, 300, 100, 300, 70) End Sub End Class
このページのQRコード
便利ウェブサイト
便利 Android アプリ
便利 iOS(iPhone,iPad) アプリ