VB.NET控件自动排序相关代码示例指南
在如今这个信息技术更新速度奇快的时代中,程序员是幸福的。因为他们可以通过这些不断更新的技术带来的更重帮助,轻松的完成各项工作需求。VB.NET编程语言就是其中一个作用比较大的编程语言。
在VB.NET中,面对大量相同控件的整齐排列时,虽可在设计时排列好,但难免在调试中不小心移动,或后来又增减一些。于是有人用语句在程序中调节,其艰辛是可想而知的(笔者深有体会),即使位置排好了,由于控件添加的先后问题,其索引属性(.TabIndex)往往一片混乱.能不能让控件的位置、索引属性的排序实现自动化呢?经过一番思索,笔者终于找到了很好的VB.NET控件自动排序解决办法,并成功应用于自己开发的注册表修改器中。
例子:新建工程,放入一个Frame控件Frame1,再在Frame1 中放入4个复选框checkbox1、checkbox2、checkbox3、checkbox4
在form_load()子过程中加入一句:ArrangeChildren frame1 运行结果为4个复选框等间距整齐地排列在其容器frame1 中。在设计窗口中,你可以任意调整它们的上下位置,运行后将按它们设计时的上下顺序整齐排列,并且它们的索引顺序按由下到大排列。(索引顺序的作用大家知道吧——让你的程序支持键盘操作)。更妙的是,你可在容器中任意增加、减少控件数量(类型要一样),运行后它们都能整齐排列,从而一劳永逸。
以下是具体的VB.NET控件自动排序子过程代码
Public Sub ArrangeChildren(Father As Control) 'Father为容器控件
功能:
(1)对容器控件内的子控件的TabIndex值进行排序
排序依据是:由上到下(.Top值由小到大),TabIndex小到大
(2)对容器控件内的子控件等间距整齐排列