一個(gè)長(zhǎng)度為L(zhǎng)的升序序列，處在L2（向上取整）位置上的數(shù)是中位數(shù)，現(xiàn)有兩個(gè)等長(zhǎng)的升序序列，求這兩個(gè)序列合并后（仍然有序）的中位數(shù)，算法如下：
設(shè)A和B的中位數(shù)分別是a和b
（1）若a=b；則a就是中位數(shù)，結(jié)束
（2）若a＜b；則舍棄A中較小的一半（若序列個(gè)數(shù)是偶數(shù)，則中位數(shù)也包含在這一半里，奇數(shù)則不包含在里面），B中較大的一半
（3）若a＞b：則舍棄A中較大的一半，B中較小的一半（含中位數(shù)）
重復(fù)上述過(guò)程（1），（2），（3）；直至兩個(gè)序列中均只剩一個(gè)元素，則較小的即為中位數(shù)。
如序列A{4，5，12，17}，序列B{5，8，19，21}，A序列中位數(shù)5＜B序列中位數(shù)8；舍去A序列較小的
一半保留{12，17}，B序列保留{5，8}，接著，中位數(shù)12＞5，舍去A序列較大的一半保留{12}，B保留{8}，最后兩個(gè)序列中均只剩一個(gè)元素，則較小的即為中位數(shù)，因此結(jié)果為8．程序運(yùn)行界面如下圖：

（1）要使程序運(yùn)行時(shí)，自動(dòng)執(zhí)行代碼Text1．width=2019將文本框Text1的Width的寬度設(shè)置為2019，可以在

A

A

（A．From_Load （　　）/B．From_Click （　?。?C．From 1_Load  （　　）/D．From 1．Click  （　?。?nbsp;） 事件中添加語(yǔ)句。
（2）實(shí)現(xiàn)上述功能的VB程序如圖，請(qǐng)?jiān)跈M線處填入合適代碼


（3）序列num1元素為{10，11，17，18，19，41}，序列num2元素為{9，19，26，38，50，57}，通過(guò)該程序查找中位數(shù)，Do While循環(huán)體需要執(zhí)行

2

2

次。