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