Vb.net-button

提供:Dev Guides
移動先:案内検索

VB.Net-ボタンコントロール

Buttonコントロールは、標準のWindowsボタンを表します。 通常、Clickイベントのハンドラーを提供することにより、Clickイベントを生成するために使用されます。

ツールボックス広告からButtonコントロールをドラッグしてフォームにドロップし、ラベルを作成しましょう。

VB.Netボタンコントロール

ボタンコントロールのプロパティ

以下は、Buttonコントロールの一般的に使用されるプロパティの一部です-

Sr.No. Property & Description
1

AutoSizeMode

Buttonが自動的にサイズ変更するモードを取得または設定します。

2

BackColor

コントロールの背景色を取得または設定します。

3

BackgroundImage

コントロールに表示される背景画像を取得または設定します。

4

DialogResult

ボタンがクリックされたときに親フォームに返される値を取得または設定します。 これは、ダイアログボックスの作成中に使用されます。

5

ForeColor

コントロールの前景色を取得または設定します。

6

Image

ボタンコントロールに表示される画像を取得または設定します。

7

Location

コンテナの左上隅に対するコントロールの左上隅の座標を取得または設定します。

8

TabIndex

コンテナ内のコントロールのタブオーダーを取得または設定します。

9

Text

このコントロールに関連付けられたテキストを取得または設定します。

ボタンコントロールのメソッド

以下は、ボタンコントロールの一般的に使用されるメソッドの一部です-

Sr.No. Method Name & Description
1

GetPreferredSize

コントロールをはめ込むことができる長方形の領域のサイズを取得します。

2

NotifyDefault

それに応じて外観を調整できるように、ボタンがデフォルトのボタンであるかどうかをボタンに通知します。

3

Select

コントロールをアクティブにします。

4

ToString

存在する場合、コンポーネントの名前を含む文字列を返します。 このメソッドはオーバーライドしないでください。

ボタンコントロールのイベント

以下は、Buttonコントロールの一般的に使用されるイベントの一部です-

Sr.No. Event & Description
1

Click

コントロールがクリックされたときに発生します。

2

DoubleClick

ユーザーがButtonコントロールをダブルクリックすると発生します。

3

GotFocus

コントロールがフォーカスを受け取ったときに発生します。

4

TabIndexChanged

TabIndexプロパティの値が変更されたときに発生します。

5

TextChanged

Textプロパティの値が変更されたときに発生します。

6

Validated

コントロールの検証が完了すると発生します。

Buttonコントロールのプロパティ、メソッド、およびイベントの詳細なリストについては、Microsoftのドキュメントを参照してください。

次の例では、3つのボタンを作成します。 この例では、みましょう-

  • ボタンのキャプションを設定する
  • ボタンに画像を設定します
  • 各ボタンのクリックイベントを処理する

次の手順を実行します-

  • ラベルコントロールをフォームにドラッグアンドドロップします。
  • Textプロパティを設定して、キャプション「チュートリアルポイント」を提供します。
  • フォームに3つのボタンをドラッグアンドドロップします。
  • プロパティウィンドウを使用して、ボタンのNameプロパティをそれぞれbtnMoto、btnLogoおよびbtnExitに変更します。
  • プロパティウィンドウを使用して、ボタンのテキストプロパティをそれぞれMotoの表示、ロゴの表示、終了に変更します。
  • プロパティウィンドウを使用して別のボタンをドラッグアンドドロップし、Imageプロパティを設定してbtnImageという名前を付けます。

この段階で、フォームは次のようになります-

ボタン

フォームをクリックし、コードエディターで次のコードを追加します-

Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
      ' Set the caption bar text of the form.
      Me.Text = "tutorialspont.com"
      btnImage.Visible = False
   End Sub

   Private Sub btnMoto_Click(sender As Object, e As EventArgs) Handles btnMoto.Click
      btnImage.Visible = False
      Label1.Text = "Simple Easy Learning"
   End Sub

   Private Sub btnExit_Click(sender As Object, e As EventArgs) Handles btnExit.Click
      Application.Exit()
   End Sub

   Private Sub btnLogo_Click(sender As Object, e As EventArgs) Handles btnLogo.Click
      Label1.Visible = False
      btnImage.Visible = True
   End Sub
End Class

最初のボタンをクリックすると、表示されます-

結果ウィンドウ

2番目のボタンをクリックすると表示されます-

結果ウィンドウ

3番目のボタンをクリックすると、アプリケーションが終了します。