方法一:
自定义一个线类型数据数组,记录每条线的相关信息。用ListBox显示每条线的相关信息。
在ListBox里选定要删除的线,设置相关线类型数据的绘画属性为False,清除PicBox,按顺序重画每条线(当其绘画属性为False时不画)。
方法二:(仿PS图层、单元)
跟方法一相似。利用Line控件数组(可以扩展加上Shape控件)。用ListBox显示每条线的相关信息。
在ListBox里选定要删除的线,设置对应的Line控件的Visible属性为False即可。
当输出图片时,按顺序画线(遇到Line的Visible属性为False时不画)
VB控件数组的操作技巧 控件数组有在设计时设置好的,也有在运行中创建的。控件数组一方面使得程序简洁、令代码易于维护,另一方面能使程序具有灵活性。可见,科学地利用控件数组可使编程工作的效率更高。本文是从笔者回答网友的问题中整理出来的,与原来的回答相比略有改动。希望这些"技巧"对大家有些帮助。如有不妥之处,敬请指教。 一、运行中设置数组控件的属性 设窗体上有若干个以 Command1 命名的命令按钮,现要求:点击其中一个按钮后,该按钮不可用,而其它的按钮均可用。以下几行代码可以实现这个要求,比一个一个的设置高效得多。
窗体上已有一个文本框Text1,程序需要在运行时动态地创建若干文本框,可这样实现:
其实例二已经给数组控件命了名,只是简单了些。本例将文件夹"F:\Txt"下的所有.txt的文件名作为菜单的Caption添加到菜单项里[请事先建立此文件夹并拷贝一些.txt文件,或者更改代码],当点击这些菜单,程序将调出Windows的记事本打开相应的文件。 曾有一位网友两次问土人怎样才能在窗体上添加100万个文本框。呵呵,这要多大的显示器才能显示出来呀!不过,添加的数组控件多了,排列确实是个问题。下面的例子给窗体添加499个Label控件,连同事先绘制好的Index号定义为0的控件,总共有500个,能在窗体上从左到右、从上到下整齐地排列。程序运行时要花些许时间。 那就不能这样做了,2个的index是不同的,改为:
1)绘制或选择要作为一个控件数组的所有控件,必须保证它们为同一类型的控件。
图 通过修改控件名称建立控件数组
2.复制现有的控件,并将其粘贴到所在容器中
3.给控件设置一个Index属性值
图 同时移动一组图形 |