足球十大搞笑进球:在VB中要实现这样的效果怎么实现:

来源:百度文库 编辑:高校问答 时间:2024/04/29 16:52:45
四个单选项,四个LABEL ,当选中一个单选项,四个LABEL中的一个被显示出来,选中另一个,则前一个LABEL隐藏,另一个LABEL显示出来,.......依次类推,在VB中这段程序代码怎么写才可以实现这效果,请给出代码,不知可否,谢谢
希望每句语句给出注释,谢谢

首先做一个单选数组
然后做一个label组 就是你点一个然后复制点是就可以了

private option1_Click(Index as Integer)
for i=0 to 3
if Index=i then
label(i).visible=true
else
label(i).visible =false
next

end sub