【正确答案】正确答案:【操作步骤】 步骤1:打开木题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 参考答案 For i=1 To 10'循环比较大小实现排序 f=True'设置标签 For j=1 To 9 If a(j)>a(j+1)Then'相邻两数比较将最小值放前面 t=a(j) a(j)=a(j+1) a(j+1)=t f=False'当有交换就置标签为假 End If Next j If f Then'如果上次循环没有交换数据,则证明序列已排序好,则f为真退出循环 Exit For End If Next i 步骤3:凋试并运行程序,关闭程序后按题目要求存盘,如图3.34。
