エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
グラフィックス
' とりあえずいい加減にやった。質問文中の図と上下逆だったりするので適当にソース弄って調整してくだ... ' とりあえずいい加減にやった。質問文中の図と上下逆だったりするので適当にソース弄って調整してください。 ' …なんかもっとすっきりしたコード書けそうなんだけどなあ Option Explicit On Option Strict On Imports System Public Class Q7371104 Public Shared Sub Main() Dim bmp As System.Drawing.Bitmap = New System.Drawing.Bitmap(500,500) Dim g As System.Drawing.Graphics = System.Drawing.Graphics.FromImage(bmp) 'こっちのほうがわかりやすいかなと。 g.Clear(System.Drawing.Color.Black) Dim path1 As System.