我正在寻找一种添加复选框checkedchanged事件的方法。
我想要的是,如果选中了我的CB_Consultant(CB =复选框),它将启用CB_EndDate和TB_Company(文本框)
我不知道如何处理即时点击
这是我的代码,感谢您的帮助
function GenerateForm {
[reflection.assembly]::loadwithpartialname("System.Windows.Forms") | Out-Null
[reflection.assembly]::loadwithpartialname("System.Drawing") | Out-Null
$Form_UC_Main = New-Object System.Windows.Forms.Form
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Point = New-Object System.Drawing.Point
$InitialFormWindowState = New-Object System.Windows.Forms.FormWindowState
$OnLoadForm_StateCorrection=
{#Correct the initial state of the form to prevent the .Net maximized form issue
$Form_UC_Main.WindowState = $InitialFormWindowState
}
#----------------------------------------------
#region Generated Form User Creation Main Windows Code
$Form_UC_Main.Text = "User Creation software"
$Form_UC_Main.Name = "form1"
$Form_UC_Main.DataBindings.DefaultDataSourceUpdateMode = 0
$Form_UC_Main.size = new-object System.Drawing.Size(300,250)
#End of Main form windows code
#initialize the Checkboxe, if check should activate CB_EndDate and TB_Company
$CB_Consultant = New-Object System.Windows.Forms.CheckBox
$CB_Consultant.location = new-object System.Drawing.Size (124,130)
$CB_Consultant.Size = new-object System.Drawing.Size(15,14)
$CB_Consultant.UseVisualStyleBackColor = $True
$CB_Consultant.TabIndex = 0
$CB_Consultant.checkAlign = "MiddleRight"
#$CB_Consultant.Text = "Site groups change"
$CB_Consultant.DataBindings.DefaultDataSourceUpdateMode = 0
$CB_Consultant.Name = "Consultant"
$CB_Consultant.CheckState
$Form_UC_Main.Controls.Add($CB_Consultant)
$CBL_AccType = new-object System.Windows.Forms.Label
$CBL_AccType.Location = new-object System.Drawing.Size(20,130)
$CBL_AccType.size = new-object System.Drawing.Size(120,20)
$CBL_AccType.Text = "Enable if Checked :"
$Form_UC_Main.Controls.Add($CBL_AccType)
#This checkbox is disable by default, should be enable by checking CB_Consultant
$CB_EndDate = New-Object System.Windows.Forms.CheckBox
$CB_EndDate.location = new-object System.Drawing.Size(125,150)
$CB_EndDate.Size = new-object System.Drawing.Size(20,20)
$CB_EndDate.UseVisualStyleBackColor = $True
$CB_EndDate.TabIndex = 0
$CB_EndDate.enabled = $false
#$CB_EndDate.Text = "Site groups change"
$CB_EndDate.DataBindings.DefaultDataSourceUpdateMode = 0
$CB_EndDate.Name = "EndDateActivation"
$Form_UC_Main.Controls.Add($CB_EndDate)
$TBL_EndDate2 = new-object System.Windows.Forms.Label
$TBL_EndDate2.Location = new-object System.Drawing.Size(50,154)
$TBL_EndDate2.Size = new-object System.Drawing.Size(60,20)
$TBL_EndDate2.Text = "End Date:"
$Form_UC_Main.Controls.Add($TBL_EndDate2)
#This TextBox is disable by default, should be enable by checking CB_Consultant
$TB_Company = new-object System.Windows.Forms.Textbox
$TB_Company.Location = new-object System.Drawing.Size(125,170) #was 125,130
$TB_Company.Size = new-object System.Drawing.Size(150,27)
$TB_Company.DataBindings.DefaultDataSourceUpdateMode = 0
$TB_Company.enabled = $false
$TB_Company.Name = "Company Name"
$Form_UC_Main.Controls.Add($TB_Company)
$TBL_Company = new-object System.Windows.Forms.Label
$TBL_Company.Location = new-object System.Drawing.Size(50,175) #was 50,122
$TBL_Company.Size = new-object System.Drawing.Size(60,35)
$TBL_Company.Text = "Company:"
$Form_UC_Main.Controls.Add($TBL_Company)
#Save the initial state of the form
$InitialFormWindowState = $Form_UC_Main.WindowState
#Init the OnLoad event to correct the initial state of the form
$Form_UC_Main.add_Load($OnLoadForm_StateCorrection)
#Show the Form
$Form_UC_Main.ShowDialog()| Out-Null
} #end of function
GenerateForm
最佳答案
找到它很容易,但是花了我很多时间才能找到那个过程。这就是我所做的
我走了这条线
$CB_Consultant.CheckState
并替换为以下代码:
$CB_Consultant.Add_CheckStateChanged({
$TB_Company.enabled = $CB_Consultant.Checked
$CB_EndDate.enabled = $CB_Consultant.Checked
#and so on
})
结果是一个带有两个灰色区域的复选框,当您单击复选框时,另外两个字段变为 Activity 状态。
关于.net - Powershell/.net CheckedChanged事件处理,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/16567405/