在 VB 编程中,我们经常要动态的控制很多不同控件的属性,例如我们要将一个 CommandButton 阵列共 20 个控件中的第 1 、 4 、 6 、 7 、 8 、 11 、 18 、 20 号删除。该怎么办呢?这时只要将要删除的控件的 Tag 属性设置为 1 ,然后加入以下代码就可以了。
For i=1 To 20
If Command1(i).Tag=1 Then
Unload Command1(i)
End If
Next i