假定窗口名为:“Form1”,假定窗口内的所有控件都未知,现在需要进行遍历,若能查找出名字为“abc”的控件,将其的Caption属性改为“没头脑”。
解决方案 »
- VB而非VBA将Excel工作簿的一个表单独保存为一个工作簿
- Dim A As New B 為何有些無法寫成帶有 "New" 的宣告
- 查询的问题?
- 急请教VBA程序:将文本文件(TXT格式)转化成access表,并将每行的前100个字母按10,20,30,40的固定宽度划分格子
- 查ADODC1.RECORDSET.RECORDCOUNT=1214,但执行ADODC1.RECORDSET.RECORDLAST后,显示的却是第1060条记录,为什么呀?
- 裸体跪求:带图像的列表框控件~
- 请高手指教--文件保存
- 请saucer帮助解决。
- 关于OpenDialog控件的问题?
- 存储过程主要有什么好处?
- 怎样遍历数据集中所有字段的字段名?
- [求助]请问如何使用 ACTIVEBAR。ACTIVESKIN 控件!
Private Sub abc_Click()
Dim ctl As Control
For Each ctl In Me.Controls
If ctl.Name = "abc" Then
ctl.Caption = "abc"
End If
Next
End Sub
For Each<元素>In<集合|数组>
[语句块]
[Exit For]
[语句块]
Nextctl是个循环变量啊,Me.Controls就是该窗体内的控件集合啊