日期:2009-11-07  浏览次数:20502 次

今天,注意了一下VB.NET中所有的控件,几乎都有同一个属性:Tag属性,试了下发现使用它,可以达到许多意想不到的效果。
在编写程序时,我们经常要控制很多不同控件的属性,例如我们要将20个TextBox控件中的第1、3、4、6、7、10、11个的内容清空。该怎么半呢?这时只要将要清空内容的控件的Tag属性设置为a,然后加入以下代码就可以了。


按钮事件
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim con As Control
For Each con In Me.Controls
If TypeOf (con) Is TextBox Then
Dim txt As TextBox = con
If txt.Tag = "a" Then
txt.Text = ""
End If
End If
Next
End Sub

由于在VB.NET中控件数组这个概念不存在了,所以上述代码先进行了控件类型的判断,如果是在VB6.0中
那就更简单了。只要如下就行:

For i=1 To 20
If Text1(i).Tag= "a"Then
Text1(i).Text= ""
End If
Next i

感觉这个Tag属性,可以当成是一个控件的标签,或者用来作为控件的备注。