on error resume next
dim t as control
for each t in controls
t.caption="texxx"
next t如果选择性更改的话:
dim t as control
for each t in controls
select case typename(t)
case "Label"
t.caption="texxx"
case "TextBox"
t.text="sdfsad"
end select
next t
dim t as control
for each t in controls
t.caption="texxx"
next t如果选择性更改的话:
dim t as control
for each t in controls
select case typename(t)
case "Label"
t.caption="texxx"
case "TextBox"
t.text="sdfsad"
end select
next t
解决方案 »
- 新手:如何去除Form的Picture属性???急!!
- 奇怪的TreeView展开问题
- 如何使picturebox里面的图片背景透明
- form1和form2关系
- 各位大虾,请教一个问题,用vb如何如何给手机发短信?急急急
- 如何通过本机文件夹路径获得共享文件的路径?
- 各位高手,救救急,Crystal9.0问题,我已经花了1个星期了,还没有解决,现在急用,帮帮忙
- 安装VB6.0中文版后,打开工程等一些对话框字体出现乱码?怎么解决?这是怎么回事呀?
- 如何截获Ctrl+Del+Atl消息?
- D版的sql7.0不能卸载。卸载后有问题。谁知道??谢谢捧场!!这是白拿的分!回答后就给分!
- 关于visdata的问题,帮忙up者有分
- 怎样升级显卡的驱程???
dim t as control
for each t in controls
t.caption="xxxxx"
t.text="xxxxx"
next t