VBレスキュー(花ちゃん)
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ各掲示板

メニューへ戻ります。 Button 関係のメニュー
1.Button コントロールに関するワンポイントテクニック集
2.ボタン等のテキストを影付き文字等色々なスタイルで表示
3.円形のボタンを作成する 
4. 
5. 
6.
7.
8. 
9. 
10. 
11.
12.
 . 
20.その他、当サイト内に掲載の Button に関するサンプル


3.円形のボタンを作成する(15_Btn_03) (旧、SampleNo.113)
1.円形のボタンを作成する
2.
3.
4.
5.
6.

上記以外に、コントロール共通関係 のところやこれ以外のコントロールのところに書いてある場合もありますので、そちらの方もご覧ください。

 下記プログラムコードに関する補足・注意事項 
動作確認:Windows 8.1 (Windows 7) / VB2013 (VB2010) / Framework 4.5.1 / 対象の CPU:x86
Option :[Compare Text] [Explicit On] [Infer On] [Strict On]
Imports :追加なし
参照設定:
追加なし
その他 :
    :
このサンプル等の内容を無断で転載、掲載、配布する事はお断りします。(私の修正・改訂・削除等が及ばなくなるので)
必要ならリンクをはるようにして下さい。(引用の場合は引用元のリンクを明記して下さい)
このページのトップへ移動します。 1.円形のボタンを作成する

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    'ボタンの表示位置と大きさ(作成するボタンのサイズより大きめに)
    With Button1
        .SetBounds(140, 40, 100, 100)
        '.BackColor = Color.Red
        Using myPath As New System.Drawing.Drawing2D.GraphicsPath
            'GraphicsPath.AddEllipse メソッド
            '現在のパスに楕円を追加します。
            '楕円を定義する外接する四角形の(x, y, Width, Height)
            myPath.AddEllipse(New Rectangle(9, 9, 80, 80))
            .Region = New Region(myPath)
        End Using
    End With
End Sub

  図1.上記実行結果
 vb2005button03_1

上記、円形以外にも多角形のボタンや画像の形のボタンや文字の形のボタン等も作成する事ができます。

このページのトップへ移動します。 2.


このページのトップへ移動します。 3.


このページのトップへ移動します。 4.


このページのトップへ移動します。 5. 



このページのトップへ移動します。 6.


このページのトップへ移動します。 検索キーワード及びサンプルコードの別名(機能名)
多角形のボタン 画像の形のボタン 文字の形のボタン
色々な形のボタンコントロールを作成 色々な形のButtonを作成



このページのトップへ移動します。