班级里有48名学生，按6行8列安排座位，每2列为一组，共4组，矮的在前，高的在后。班级里每周都进行位置轮换，轮换规则如下：第一组同学换到第二组，第二组同学换到第三组，第三组同学换到第四组，第四组同学换到第一组， 并且同桌之间互换位置。为了方便学生在座位轮换的时候快速找到自己的新座位，设计了如下VB程序：窗体加载时，从数据库中读取班级学生数据，并按身高从小到大排序后，以6行8列的形式显示在列表框List1中：单击命令按钮Comand1后，在列表框list2中显示进行次轮换后的座位表。 程序运行界面如下：

实现上述功能的VB程序如下，请回答下列问题：