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

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

[1，20]，[25，200]

[1，20]，[25，200]

。
（2）請(qǐng)?jiān)跈M線處填入合適的代碼。
Dima（1To100）AsInteger'數(shù)組a存儲(chǔ)合并前的區(qū)間
Dimb（1To100）AsInteger'數(shù)組b存儲(chǔ)合并后的區(qū)間
DimnAsInteger'n表示區(qū)間個(gè)數(shù)
PrivateSubCommand1_Click

（　?。?/div>

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