在三张完全相同的卡片上分别标注：A“一雨水”、B“大地”、C“生机”，放入一个不透明的的口袋中，随机从中抽出一张放入“□给□带来□”左边“□”内；第二次抽出一张放入中间的“□”内；第三次抽出一张放入右边的“□”内（每次卡片抽出后不放回）。

（1）试用树形图列出三次抽卡出现的所有可能的结果表明；

（2）求其中恰好组成“雨水给大地带来生机”的概率。

下面是用冒泡法将5个整数按升序排列，请将程序补充完整。　　Sub GASR()　　　　Dim m　　　　m=Array(10，1，5，6，7)　　　　For i=0 To 3　　　　　　For j=【】　　　　　　　　　If m(i) ＞=m(j) Then　　　　　　　　【】　　　　　　　　　m(i) =m(j)　　　　　　　　m(j) =t　　　　　　End If　　　　Next j　　　 【】　　　　For i=0 To 4　　　　　　Print m(i)　　　Next i　　End Sub