タイトル : Re: 1つのCSVファイルから2つプログラムを動かす。vb.net 投稿日 : 2017/12/20(Wed) 12:20 投稿者 : shu
> > g.FillRectangle(Brushes.Orange, 10, 20, 700, 80) '座標を決めて塗りつぶしたオレンジ色の長方形を描画する(塗りたい色,x座標,y座標,幅,高さ) > g.FillEllipse(Brushes.White, 70, 25, 70, 70) '座標をそれぞれ決めて塗りつぶした白い円を6個描画する > g.FillEllipse(Brushes.White, 170, 25, 70, 70) > g.FillEllipse(Brushes.White, 270, 25, 70, 70) > g.FillEllipse(Brushes.White, 370, 25, 70, 70) > g.FillEllipse(Brushes.White, 470, 25, 70, 70) > g.FillEllipse(Brushes.White, 570, 25, 70, 70) > Dim points As Point() = {New Point(710, 100), '三角形を描画する座標を決める > New Point(710, 20), > New Point(790, 60)} > '多角形を描画する > g.FillPolygon(Brushes.Orange, points, FillMode.Alternate) '塗りつぶす色をオレンジに設定する > g.TranslateTransform(190, 0) 'gに座標を 190, 0に指定してオブジェクトを変換する。 > '多角形を描画する > この部分を実行されなければ表示されますでしょうか? だとしたら、描画順番を変えればよいです。(文字を描画した上に四角や円を塗りつぶしで描画しているだけだと思います。) |