當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET Control.EnabledChanged事件代碼示例

本文整理匯總了VB.NET中System.Windows.Forms.Control.EnabledChanged事件的典型用法代碼示例。如果您正苦於以下問題:VB.NET Control.EnabledChanged事件的具體用法?VB.NET Control.EnabledChanged怎麽用?VB.NET Control.EnabledChanged使用的例子?那麽, 這裏精選的事件代碼示例或許可以為您提供幫助。


在下文中一共展示了Control.EnabledChanged事件的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: Form1

' 導入命名空間
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Text
Imports System.Windows.Forms



Public Class Form1
   Inherits Form
   Private WithEvents radioButton1 As RadioButton
   Private WithEvents radioButton2 As RadioButton
   
   
   Public Sub New()
      InitializeComponent()
   End Sub
   
   <STAThread()>  _
   Shared Sub Main()
      Application.EnableVisualStyles()
      Application.SetCompatibleTextRenderingDefault(False)
      Application.Run(New Form1())
   End Sub
   
   
   Private Sub InitializeComponent()
      Me.radioButton1 = New System.Windows.Forms.RadioButton()
      Me.radioButton2 = New System.Windows.Forms.RadioButton()
      Me.SuspendLayout()
      ' 
      ' radioButton1
      ' 
      Me.radioButton1.AutoSize = True
      Me.radioButton1.Location = New System.Drawing.Point(0, 0)
      Me.radioButton1.Name = "radioButton1"
      Me.radioButton1.Size = New System.Drawing.Size(62, 17)
      Me.radioButton1.TabIndex = 0
      Me.radioButton1.TabStop = True
      Me.radioButton1.Text = "Button1"
      Me.radioButton1.UseVisualStyleBackColor = True
      ' 
      ' radioButton2
      ' 
      Me.radioButton2.AutoSize = True
      Me.radioButton2.Location = New System.Drawing.Point(0, 39)
      Me.radioButton2.Name = "radioButton2"
      Me.radioButton2.Size = New System.Drawing.Size(100, 17)
      Me.radioButton2.TabIndex = 1
      Me.radioButton2.TabStop = True
      Me.radioButton2.Text = "Disable Button1"
      Me.radioButton2.UseVisualStyleBackColor = True
      ' 
      ' Form1
      ' 
      Me.ClientSize = New System.Drawing.Size(292, 273)
      Me.Controls.Add(radioButton2)
      Me.Controls.Add(radioButton1)
      Me.Name = "Form1"
      Me.ResumeLayout(False)
      Me.PerformLayout()
   End Sub
    
   
   Private Sub radioButton2_CheckedChanged(sender As Object, e As EventArgs) Handles radioButton2.CheckedChanged
      radioButton1.Enabled = False
   End Sub
   
   
   Private Sub radioButton1_EnabledChanged(sender As Object, e As EventArgs) Handles radioButton1.EnabledChanged
      MessageBox.Show("This button has been disabled.")
   End Sub
End Class
開發者ID:VB.NET開發者,項目名稱:System.Windows.Forms,代碼行數:75,代碼來源:Control.EnabledChanged


注:本文中的System.Windows.Forms.Control.EnabledChanged事件示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。