神马品牌网暗黑3到70刷什么:VB中是否有对所有shape同时操作的代码？
来源：百度文库 编辑：神马品牌网 时间：2024/04/29 19:05:10
本人编的程序在form2中有49个shape，名称为shape1-49，请高手指点怎样将此49个shape的fillstyle一次全部调成0，或全部调为1。谢谢
建立一个控件数组shape1(1 to 49),然后用循环:
for i=1 to 49
shape1(i).fillstyle=0
next
神马品牌网是一部内容开放、自由的互动网络百科全书
客观、专业、权威的知识性百科全书
来源：百度文库 编辑：神马品牌网 时间：2024/04/29 19:05:10
建立一个控件数组shape1(1 to 49),然后用循环:
for i=1 to 49
shape1(i).fillstyle=0
next