您的位置:首页 > 其它

如何遍历一个程序中的所有控件

2009-11-05 17:47 344 查看
在程序启动后如何获得窗体中所有控件的名称并显示在列表框中?

窗体上至少有ListBox和CommandBotton控件

Private Sub Command1_Click()
Dim i As Integer
For i = 0 To Me.Count - 1
'Print Me.Controls(i).Name, Me.Controls(i)

List1.AddItem Me.Controls(i).Name
Next i
End Sub
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: