无法创建控件数组

[复制链接]
查看11 | 回复2 | 2011-1-21 00:12:07 | 显示全部楼层 |阅读模式
Private Sub Form_Load()
For i = 0 To 23
Load Image6(i + 1)
a = i \ 6
b = i Mod 6
Image6(i).Left = 3000 + 3000 * b
Image6(i).Top = 3000+ 3000 * a
Image6(i).Width = 2500
Image6(i).Height = 2500
Image6(i).BorderStyle = 1
Next i
End Sub
我想创建一个控件数组。然后让他们成4行6列排为,为什么我运行时没有创建控件数组啊
你说的,我都已经做了,要不程序又运行不起来的,我的程序可以运行但,没有创建控件数组,只有最先前手动创的一个控件

回复

使用道具 举报

千问 | 2011-1-21 00:12:07 | 显示全部楼层
创建出控件数组后还要现实控件才能有用,请您添加一句:Image(i).visible=true ,用来现实控件,就可以了因为vb6默认load语句创建出来的控件是隐藏的,所以要显示出来就要用visible属性来实现了。希望对您有所帮助!
回复

使用道具 举报

千问 | 2011-1-21 00:12:07 | 显示全部楼层
你应该先在界面上建立一个控件Image6设置index=0再运行你的代码
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行