首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

vb 初学者有关问题 001

2012-02-08 
vb 菜鸟问题 001刚开始学VB,请大家执教!有N个控件,image1-image9我想通过一个循环来控制Visible属性fori1

vb 菜鸟问题 001
刚开始学VB,请大家执教!
有N个控件,image1-image9
我想通过一个循环来控制Visible属性
for   i=1   to   9
  image&i.Visible=true
next
哈哈,好像不对,应该如何编写?

[解决办法]
Dim objectx As Object
For Each objectx In Me.Controls
If Left(objectx.Name, 5) = "image " Then
objectx.visual = True
End If
Next
[解决办法]
呵呵,记住:数组在VB中是运行效率很高的方式,所以用数组而不是N个相同控件
方法:
添加一个image控件到FORM,然后右键该控件--复制,鼠点击FORM空白处,右键--粘贴,问是否创建控件数组--点 "是 ",重复8次.

这样你的FORM上就有了9个IMAGE控件分别是IMAGE(0)....IMAGE(8).剩下的就简单了:
with image
for i=0 to 8: .(i).Visible=true: next
end with
-----------------------
别着急,慢慢积累吧,呵呵

[解决办法]
For Each 的方法不好!


用控件数组
for i = Image1.LBound to Image1.UBound
Image1(i).).Visible=true
next

热点排行