鲁迅先生曾说：“挖出地下的煤来，就足够全世界使用数百年，但是数百年后呢？数百年后，我们当然是或上了天堂，或下了地狱，但我们的子孙后代却是要生存的。”鲁迅先生的话告诉我们（    ）

①资源问题关系到人类的生存和发展        ②煤炭资源是有限的，我们要合理开发利用

③煤储量丰富，取之不尽，用之不竭        ④资源的开发还应考虑后代人的需要

如图是生产者、消费者和分解者的关系示意图，回答下列问题：

程序运行界面如图所示，左边列表框List1中显示数据（成绩和姓名），单击 “开始排序”按钮（Command1），排序后的结果按成绩从高到低显示在列表框List2中。

解决此问题的排序部分的程序段如下：

Dim m(1 To 10) As Single

Dim name(1 To 10) As String

Private Sub Command1_Click( )

Dim i As Integer, j As Integer, k As Integer, x As Single, y As String

For i = 1 To 9

    k = i

    For j = i + 1   To  10

        If      ①      Then k = j

    Next j

    If k <> i Then

        x = m(i) : m(i) = m(k) :       ②      

        y = name (i) :  name (i) = name (k)   :  name (k) = y

    End If

Next I

    For I = 1  To  10

        List2.AddItem Str(m(i)) + "     " + name(i)

    Next i

End Sub

Private Sub Form_Load()

       ' 此过程用于对数组a和数组b进行初始赋值，代码略

End Sub

在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：