增加禁用风速自动停止复选框

This commit is contained in:
2026-03-28 16:52:46 +08:00
parent 8c3b67ca9f
commit 7385079afe
6 changed files with 25 additions and 17 deletions

View File

@@ -291,7 +291,8 @@ Public Class AddPeripherals
CheckBox2.Visible = True
CheckBox5.Text = "风速模式提示音"
CheckBox5.Visible = True
CheckBox3.Text = "禁用风速自动停止"
CheckBox3.Visible = True
SplitContainer4.Panel1Collapsed = True
SplitContainer4.Panel2Collapsed = False
Dim val As String = FindAttributeValueUnderModel(Resultmodel, "设备存在" "水机无阀")
@@ -766,7 +767,7 @@ Public Class AddPeripherals
CheckBox4.Visible = False
CheckBox2.Visible = False
CheckBox3.Visible = False
CheckBox6.Visible = False
FdevPort.Visible = False
FdevAddr.Visible = False
FdevPortCom.Visible = False
@@ -811,7 +812,8 @@ Public Class AddPeripherals
CheckBox5.Text = "风速模式提示音"
CheckBox5.Visible = True
CheckBox4.Visible = True
CheckBox3.Text = "禁用风速自动停止"
CheckBox3.Visible = True
SplitContainer4.Panel1Collapsed = True
SplitContainer4.Panel2Collapsed = False
Dim val As String = FindAttributeValueUnderModel(Resultmodel, "设备存在" "水机无阀")
@@ -3080,7 +3082,7 @@ Public Class AddPeripherals
End Sub
Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox2.CheckedChanged
CheckBox3.Checked = CheckBox2.Checked
' CheckBox3.Checked = CheckBox2.Checked
End Sub