vb 控件数组 怎么使用vs2010
我现在有40个CheckBox1-40,我想让他们执行相同的;IfCheckBox1.Checked=FalseThenTextBox1.Enabled=FalseTex...
我现在有40个 CheckBox1-40,我想让他们执行相同的;
If CheckBox1.Checked = False Then
TextBox1.Enabled = False
TextBox1.Text = ""
Else
TextBox1.Enabled = True
End If 展开
If CheckBox1.Checked = False Then
TextBox1.Enabled = False
TextBox1.Text = ""
Else
TextBox1.Enabled = True
End If 展开
1个回答
展开全部
For i = 1 To 40
If DirectCast(Controls("CheckBox" & i), CheckBox).Checked = False Then
TextBox1.Enabled = False '如果不是固定的 TextBox1,参照上面的自己修改
TextBox1.Text = ""
Else
TextBox1.Enabled = True
End If
Next
If DirectCast(Controls("CheckBox" & i), CheckBox).Checked = False Then
TextBox1.Enabled = False '如果不是固定的 TextBox1,参照上面的自己修改
TextBox1.Text = ""
Else
TextBox1.Enabled = True
End If
Next
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询