編寫(xiě) VB 程序，功能是根據(jù)各班級(jí)初賽成績(jī)（班級(jí)數(shù)為偶數(shù)，每個(gè)班級(jí)初賽人數(shù)＞=3）前3 名的選手進(jìn)行復(fù)賽分組，其中各班級(jí)選手編號(hào)由班級(jí)代碼+編號(hào)組成，例如“1001”表示 1 班 001 號(hào)，復(fù)賽分組規(guī)則如表所示：

第1組	第2組	第3組	……	第7組	第8組	第9組
1班第1名	1班第2名	1班第3名	……	5班第1名	5班第2名	5班第3名
2班第3名	2班第2名	2班第1名	……	6班第3名	6班第2名	6班第1名

程序運(yùn)行界面如圖所示：

（1）若存儲(chǔ)初賽成績(jī)的數(shù)據(jù)表中添加一條記錄“選手編號(hào) 2058，選手成績(jī)?yōu)?nbsp;97.6”，重新運(yùn)行該程序讀取數(shù)據(jù)，點(diǎn)擊“分組”后，與選手“1001”分到一組進(jìn)行復(fù)賽的選手編號(hào)為

B006

B006

。
（2）實(shí)現(xiàn)上述功能的 VB 程序如下，請(qǐng)?jiān)跈M線(xiàn)處填入合適的代碼。