|
■No94615 (IT新人 さん) に返信
> Boolean型の変数を定義して、その変数に対してTrueまたはFalseを設定して、コントロールのEnabledプロパティへ適用したいです。
> イメージとしては、下記のような感じなのですが、これでは駄目でした
> Dim ENABLE_FLG As Boolean
> ENABLE_FLG = True
> BUTTON1.Enabled = ENABLE_FLG
こういう感じでしょうか?
Public Class Form1
Public Property ENABLE_FLG As Boolean
Get
Return Button1.Enabled
End Get
Set(value As Boolean)
Button1.Enabled = value
Button2.Enabled = Not value
End Set
End Property
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
ENABLE_FLG = True
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click, Button2.Click
ENABLE_FLG = Not ENABLE_FLG
End Sub
End Class
|