动态添加picturebox 数组，为什么picturbox上面的控件不能显示 - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → 动态添加picturebox 数组，为什么picturbox上面的控件不能显示

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 4459 人关注过本帖

标题：动态添加picturebox 数组，为什么picturbox上面的控件不能显示

只看楼主加入收藏

shi1209jie

等　级：新手上路
帖　子：6
专家分：0
注　册：2013-8-2
结帖率：0

楼主

已结贴√ 问题点数：20 回复次数：12

动态添加picturebox 数组，为什么picturbox上面的控件不能显示

搜索更多相关主题的帖子: 动态　

2016-06-08 16:56

hjxlj

来　自：江西
等　级：贵宾
威　望：14
帖　子：292
专家分：1519
注　册：2013-6-25

第 2 楼

得分:7

你是怎么动态添加的，把你的代码粘贴上来。

本人QQ:775420425

2016-06-08 17:02

ZHRXJR

等　级：版主
威　望：125
帖　子：1034
专家分：5519
注　册：2016-5-10

第 3 楼

得分:0

动态添加控件，几个需要注意的问题：
1、Load 是动态添加控件的必须语句，并且添加的控件的Visible 属性必须设置为 True；
2、动态添加的控件的Left与Top属性根据添加的控件位置不同而动态改变；
看下面的例句：

程序代码：

For I = 1 To 19
Load Picture1(I)
Picture1(I).Visible = True
If I Mod 5 <> 0 Then
Picture1(I).Left = Picture1(I - 1).Left + Picture1(I - 1).Width + 120
Picture1(I).Top = Picture1(I - 1).Top
Else
Picture1(I).Left = Picture1(0).Left
Picture1(I).Top = Picture1(0).Top + I * 120
End If
Next I

运行效果图如下，动态添加了19个Picture控件，注意原界面应该有Picture1(0)控件。

图片附件: 游客没有浏览图片的权限，请登录或注册

[此贴子已经被作者于2016-6-8 20:04编辑过]

请不要选我！！！

2016-06-08 20:02

xiangyue0510

等　级：贵宾
威　望：86
帖　子：941
专家分：5244
注　册：2015-8-10

第 4 楼

得分:7

动态添加picturebox 数组，为什么picturbox上面的控件不能显示

请发帖的时候描述清楚，最好贴上（示例）代码
不清楚你是picturebox 数组没有效果，还是picturbox上面的控件（这个控件是如何生成的你也没有交代）不能显示

2016-06-08 20:13

shi1209jie

等　级：新手上路
帖　子：6
专家分：0
注　册：2013-8-2

第 5 楼

得分:0

picturebox 上面的控件不显示例如：picture(0) 上面有label1(0)控件，pictrue(1)里面有label1(1)控件，.......动态添加

2016-06-09 11:10

xiangyue0510

等　级：贵宾
威　望：86
帖　子：941
专家分：5244
注　册：2015-8-10

第 6 楼

得分:0

label的container设置一下，注意，这个时候它的top、left是相对于picturebox的，不是窗体
另外需要设置为顶层

2016-06-09 18:11

hjxlj

来　自：江西
等　级：贵宾
威　望：14
帖　子：292
专家分：1519
注　册：2013-6-25

第 7 楼

得分:0

以下是引用ZHRXJR在2016-6-8 20:02:44的发言：

动态添加控件，几个需要注意的问题：
1、Load 是动态添加控件的必须语句，并且添加的控件的Visible 属性必须设置为 True；
2、动态添加的控件的Left与Top属性根据添加的控件位置不同而动态改变；
看下面的例句：
For I = 1 To 19
Load Picture1(I)
Picture1(I).Visible = True
If I Mod 5 <> 0 Then
Picture1(I).Left = Picture1(I - 1).Left + Picture1(I - 1).Width + 120
Picture1(I).Top = Picture1(I - 1).Top
Else
Picture1(I).Left = Picture1(0).Left
Picture1(I).Top = Picture1(0).Top + I * 120
End If
Next I
运行效果图如下，动态添加了19个Picture控件，注意原界面应该有Picture1(0)控件。

建议你以后回答问题时，详细了解提问者的具体问题后再回答，否则又会出现牛头不对马嘴的现象。回答问题不是一时兴起就能给别人真正解决问题的。

本人QQ:775420425

2016-06-09 21:12

ZHRXJR

等　级：版主
威　望：125
帖　子：1034
专家分：5519
注　册：2016-5-10

第 8 楼

得分:0

回复 7楼 hjxlj

建议你以后回答问题时，详细了解提问者的具体问题后再回答，否则又会出现牛头不对马嘴的现象。

=====================================================================================

期待你的牛头对牛嘴，马头对马嘴的回答！
看清楚！是一个例句！不要以老大的身份一味指责别人！

[此贴子已经被作者于2016-6-10 06:19编辑过]

请不要选我！！！

2016-06-10 06:17

hjxlj

来　自：江西
等　级：贵宾
威　望：14
帖　子：292
专家分：1519
注　册：2013-6-25

第 9 楼

得分:0

以下是引用ZHRXJR在2016-6-10 06:17:06的发言：

建议你以后回答问题时，详细了解提问者的具体问题后再回答，否则又会出现牛头不对马嘴的现象。

=====================================================================================

期待你的牛头对牛嘴，马头对马嘴的回答！
看清楚！是一个例句！不要以老大的身份一味指责别人！

不是指责，是提醒。另外我也不是什么老大。而且再提醒你一下，楼主需要的不是例句，而是解决问题。最讨厌你这种自以为是的家伙，问题没了解清楚，光凭头脑发热能帮楼主解决问题么？

[此贴子已经被作者于2016-6-10 11:29编辑过]

本人QQ:775420425

2016-06-10 11:26

ZHRXJR

等　级：版主
威　望：125
帖　子：1034
专家分：5519
注　册：2016-5-10

第 10 楼

得分:0

回复 9楼 hjxlj

而且再提醒你一下，楼主需要的不是例句，而是解决问题。最讨厌你这种自以为是的家伙，问题没了解清楚，光凭头脑发热能帮楼主解决问题么？
============================================================================================================================
既然这样你是最不讨厌的了，为什么到现在还没有你的牛头对牛嘴，马头对马嘴的回答！
光说空话你感到有意思吗？
给你发了一封信，不想再与你打嘴仗了。

[此贴子已经被作者于2016-6-10 16:55编辑过]

请不要选我！！！

2016-06-10 16:19

快速回复：动态添加picturebox 数组，为什么picturbox上面的控件不能显示