VB编程语句求注释:

来源:百度知道 编辑:UC知道 时间:2024/05/21 10:47:01
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

请给每句写上注释,谢谢

按照VB语法,注释用'标出
private option1_Click(Index as Integer)
'过程开始,过程为私有权限.名字是option1_Click,参数是Index ,参数类型是整数
for i=0 to 3 '循环开始,从i=0到i=3,循环体执行4次
if Index=i then '如果参数index等于i就执行下面一句
label(i).visible=true
else '否则执行else下面的一句
label(i).visible =false
next '循环体结束

end sub '过程结束

private option1_Click(Index as Integer) "Sub过程开始,单击option1触发事件."
for i=0 to 3 "For循环,定义i是0到3."
if Index=i then "If语句,如果下标等于循环i,option1的下标。"
label(i).visible=true "If条件为Ture,数组标签label(i)的可见属性visible为True,可见."
else "否则."
label(i).visible =false "数组标签label(i)的可见属性visible为False,不可见."
next "循环下一条.循环结束."

end sub "Sub过程结束"

注释