15.某玩具廠的生產流水線上有道工序,需要使用機械臂對n根長方體木塊材料進行自動化排序。排序步驟為:從左起第一個木塊開始向右尋找長度最短的,如果木塊長度相同,則選擇其中厚度較小的記錄其位置R1 (不考慮長度及厚度均相同的情況),然后對區(qū)間[1,R1]內的木塊進行整體翻轉。再從第二個木塊向右繼續(xù)尋找,并記錄其位置R2,然后對區(qū)間[2,R2]的木塊進行整體翻轉....機械臂循環(huán)操作,直至排序完成。排序過程如圖a所示,其中⑦的厚度小于⑤的厚度。
根據(jù)上述要求設計VB程序,功能如下:在窗體加載時,讀取木塊長度和厚度數(shù)據(jù),并顯示在列表框List1中,單擊“排序”按鈕實現(xiàn)木塊排序,結果顯示在列表框List2中,程序運行界面如圖b所示。
(1)代碼Private Sub Coml.Click ( )中的Coml.Click ( ?。儆?
(單選,填字母)。
A.對象名
B.事件名
C.類別名
D.事件處理過程名
(2)實現(xiàn)上述功能的VB代碼如下,請在橫線處填寫合適的代碼。
(3)程序中加框處代碼有錯,請改正。