IF文
FOR文
Usingステートメント

ArrayListを利用
IEnumerableを実装
Dictionaryを利用
StringDictionaryを利用
Stack(スタック)
Queue(キュー)
Generic List

小文字⇔大文字の変換
文字列をある文字列で分割

日付関係
現在日付と時刻の取得
明日、来月の日付の取得
月末の日付の取得
日付チェック

ファイル関係
ファイル選択ダイアログ
ファイル読み込み
CSVファイル読み込み
XmlSerializerを利用
GZip圧縮
ファイル情報の取得
フォルダ配下のファイル情報取得

MySQLに接続
ADO.NetでSQLServerに接続

スレッドを作成
ManagementObjectSearcherを利用

ドライブ情報を取得
Webリクエスト送信

フォーム関係
チェックボックス
メニューバーの作成
DataGridViewのDataSourceに配置
Timerコントロール
タスクバーにアイコンを表示
プログレスバーを表示
閉じるボタンの処理
透過度の変更
ListBoxにドラック＆ドロップ
WebBrowserコントロール
コントロールをマウスで移動
MDIアプリケーション
フォームに線を引く

正規表現
「^」について
「$」について
「+」について
「*」について
「.」について
「|」について
「{n}」について
「{n，m}」について
「[]」について

トップ

フォームに線を引く＠VB.Net

フォームに以下の様な矢印線を引きます。


フォームのPaintイベントをHandleします。

e.GraphicsにてGraphicsオブジェクトを取得します。
Penを生成し、色、幅、始点、終点を設定します。

DrawLineにて、生成したPenを元に線を引きます。
引数には、Penのオブジェクトと位置を指定します。

Public Class Form1     Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint         'Graphicsオブジェクト取得         Dim graph As Graphics = e.Graphics         'Pen生成         Dim pen As Pen = New Pen(Color.LightBlue, 20)         '始点と終点の設定         pen.StartCap = Drawing2D.LineCap.Flat         pen.EndCap = Drawing2D.LineCap.ArrowAnchor         '線を引く         graph.DrawLine(pen, 50, 50, 200, 50)     End Sub End Class