关于VB.NET实现图片控件数组的问题
具体是按开始按钮后,从十张图中随机产生一张,其他九张不显示。以前的vb有image控件,然后取相同的名字实现控件数组,我用的vs,就是vb.net。无法实现,希望高手能跟...
具体是按开始按钮后,从十张图中随机产生一张,其他九张不显示。以前的vb有image控件,然后取相同的名字实现控件数组,我用的v s,就是vb.net。无法实现,希望高手能跟我讲下,如何实现。是用picturebox还是imagelist。最好有代码,谢谢
展开
2个回答
展开全部
如果图片大小相同且小,就用imagelist
要不还是用picturebox吧
控件数组没了,你可以定义一个数组变量即可
dim p(9) as picturebox
mybase.load里加代码
p(0) = picturebox1
p(1)= picturebox2
...
p(9)= picturebox10
开始按钮中代码
dim i,j as integer
j = math.rnd()*10
for i = 0 to 9
p(i).visibale=false
next
p(j).visibale=true
要不还是用picturebox吧
控件数组没了,你可以定义一个数组变量即可
dim p(9) as picturebox
mybase.load里加代码
p(0) = picturebox1
p(1)= picturebox2
...
p(9)= picturebox10
开始按钮中代码
dim i,j as integer
j = math.rnd()*10
for i = 0 to 9
p(i).visibale=false
next
p(j).visibale=true
展开全部
动态控件方法
在程序运行时自动添加控件
这种方法
不需要一个个的在设计时画上去
如需要 还可以添加 事件 给这些控件 需要的话 可留言给我
dim p(9) as picturebox
form1_lode()...
dim i as integer
for i=0 to 9
p(i)=new picturebox
with p(i)
.sizemode=autosize
.image=new bitmap("c:/" & i & ".jpg")
.visable=false
end with
me.contorls.add(p(i))
end sub
button1_click()...
dim i,j as integer
i=int(rnd()*10)
for j=0 to 9
if i=j then
p(i).visable=true
else
p(i).visable=false
end if
next
end sub
在程序运行时自动添加控件
这种方法
不需要一个个的在设计时画上去
如需要 还可以添加 事件 给这些控件 需要的话 可留言给我
dim p(9) as picturebox
form1_lode()...
dim i as integer
for i=0 to 9
p(i)=new picturebox
with p(i)
.sizemode=autosize
.image=new bitmap("c:/" & i & ".jpg")
.visable=false
end with
me.contorls.add(p(i))
end sub
button1_click()...
dim i,j as integer
i=int(rnd()*10)
for j=0 to 9
if i=j then
p(i).visable=true
else
p(i).visable=false
end if
next
end sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询