小明編寫了一個有關整數(shù)閉區(qū)間合并操作的VB程序：從數(shù)據(jù)庫讀取閉區(qū)間數(shù)據(jù)（左端點和右端點），存儲在數(shù)組a中，按區(qū)間數(shù)據(jù)左端點升序排序，然后進行合并操作，操作結果存儲在數(shù)組b中。例如，讀取的數(shù)據(jù)為2、3、15、25、10、14、1、5、30、60、15、25，過程是：
（1）設置區(qū)間信息為[2，3]，[15，25]，[10，14]，[1，5]，[30，60]，[15，25]；
（2）按區(qū)間左端點升序排序，得到區(qū)間信息為[1，5]，[2，3]，[10，14]，[15，25]，[15，25]，[30，60]，[15，25]；
（3）合并區(qū)間，得到[1，5]，[10，25]，[30，60]。
說明：區(qū)間[1，5]和[2，3]合并為[1，5]，區(qū)間[10，14]和[15，25]合并為[10，25]，區(qū)間[10，25]和[15，25]合并為[10，25]，因此合并后的結果為[1，5]，[10，25]，[30，60]三個區(qū)間。
程序功能如下：單擊“讀數(shù)據(jù)庫”按鈕Command1，程序從數(shù)據(jù)庫讀取數(shù)據(jù)，輸出在文本框Text1中；單擊“開始處理”按鈕Command2，程序進行區(qū)間排序，并進行區(qū)間合并操作，操作后的結果輸出在文本框Text2中。程序運行結果如圖所示。

實現(xiàn)上述功能的VB程序如下，請回答下列問題：
（1）從數(shù)據(jù)庫中讀入的區(qū)間為[1，10]，[15，20]，[6，18]，[25，30]，[31，200]，則合并操作后的區(qū)間為

[1，20]，[25，200]

[1，20]，[25，200]

。
（2）請在橫線處填入合適的代碼。
Dima（1To100）AsInteger'數(shù)組a存儲合并前的區(qū)間
Dimb（1To100）AsInteger'數(shù)組b存儲合并后的區(qū)間
DimnAsInteger'n表示區(qū)間個數(shù)
PrivateSubCommand1_Click

（　　）

（　?。?/div>
'讀取數(shù)據(jù)庫中的數(shù)據(jù)，存儲到數(shù)組a中，并將區(qū)間個數(shù)存儲在變量n中
'將區(qū)間信息輸出在文本框Text1中，代碼略