题目

小明对教材上的冒泡算法进行优化，当数据已经有序时就停止加工，为此他编写了一个VB程序，功能如下：运行程序时，在列表框List1中显示排序前的数据，单击“排序”按钮Command1，在列表框List2中显示这些数据按升序排序后的结果，在标签Label1中显示排序过程的加工遍数，在标签Label2中显示排序过程的数据交换次数。运行效果如图所示。实现上述功能的VB代码如下，但加框处代码有误，请改正。 Const n=10 Dim a（1 To n）As IntegerPrivate Sub Form_Load( ) ‘排一个条形橡皮擦放在水平桌面上，下列说法合理的是①它的硬度大于铁的硬度；②它的导热性比铜的导热性差；③使用后，其密度保持不变；④若把它放在水中，一定浮在水面上；⑤无论怎样放置，它对桌面的压强都相同．A.①②④B.③④C.①②⑤D.②③