picturebox的使用問題!

candy_wang 2002-09-03 04:49:43
我想在picturebox图片上加上文字,用label实现了,但是我如果使用控件数组生成10个picturebox和label的话,label就被picturebox的图片覆盖了,无法看见。有什么办法把label在生成时可以在picturebox图像的上面呢?
源代码:
Private Sub Form_Load()
Dim i As Integer
For i = 1 To 10
Load pictureboxarray(i)
pictureboxarray(i).Left = pictureboxarray(i - 1).Left
pictureboxarray(i).Top = pictureboxarray(i - 1).Height +
pictureboxarray(i - 1).Top
pictureboxarray(i).Visible = True

load labelarray(i)
labelarray(i).left=labelarray(i-1).left
labelarray(i).top=labelarray(i-1).top+labelarray(i-1).heiht
labelarray(i).visible=true


Next
End Sub

...全文
33 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
bluecc 2002-09-04
  • 打赏
  • 举报
回复
PRINT时计算一下位置就可以了
ZORDER是不行的,因为LABEL好象怎么都在PICTUREBOX之下
candy_wang 2002-09-04
  • 打赏
  • 举报
回复
用print是可以实现,有什么办法可以让字居中?至于设置zorder属性我试过了,很像不行,是我用错了吗?请详细指点!
candy_wang 2002-09-04
  • 打赏
  • 举报
回复
怎麽計算位置呀?可以付源代碼嘛,或是詳細點!
道素 2002-09-03
  • 打赏
  • 举报
回复
设置控件的ZOrder属性
bluecc 2002-09-03
  • 打赏
  • 举报
回复
好象不行,你试试在PICTUREBOX上直接PRINT字试试,效果应该和LABEL一样的.
要不就用TEXTBOX代替LABEL,也可做到一样效果.

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧