存儲(chǔ)簡(jiǎn)單幾何圖形（正方形、長(zhǎng)方形和三角形）數(shù)據(jù)的方法描述如下：
①使用特征數(shù)：1表示正方形，2表示長(zhǎng)方形，3表示三角形；②正方形只用1個(gè)正整數(shù)數(shù)表示邊長(zhǎng)、長(zhǎng)方形用2個(gè)正整數(shù)分別表示它的長(zhǎng)和寬、三角形用3個(gè)正整數(shù)表示其三邊的邊長(zhǎng)；③數(shù)據(jù)的開(kāi)頭一個(gè)正整數(shù)n（n不超過(guò)3000，數(shù)字之間用ASCII字符逗號(hào)分隔），表示接下來(lái)共有n個(gè)簡(jiǎn)單幾何圖形的信息；所有原始數(shù)據(jù)都是合理的。如數(shù)據(jù)4，1，2，3，2，2，3，2，2，3，3，3，4，5，表示共有4個(gè)簡(jiǎn)單幾何圖形。第一個(gè)為正方形，邊長(zhǎng)為2；第二個(gè)為三角形，邊長(zhǎng)分別為2，2，3；第三個(gè)為長(zhǎng)方形，長(zhǎng)和寬分別為2，3；第四個(gè)為三角形，三邊長(zhǎng)分別為3，4，5。
根據(jù)上述存儲(chǔ)數(shù)據(jù)，小龍編寫(xiě)了一個(gè)VB程序，功能如下：窗體加載時(shí)，自動(dòng)讀取數(shù)據(jù)，依次存儲(chǔ)在數(shù)組元素a（1）、a（2）、a（3）、……中。單擊“統(tǒng)計(jì)”按鈕Command1，程序?qū)?shù)據(jù)依次進(jìn)行分析統(tǒng)計(jì)，并在列表框Listl中顯示每個(gè)簡(jiǎn)單幾何圖形是什么形狀，其周長(zhǎng)是多少，最后在列表框中所有簡(jiǎn)單幾何圖形周長(zhǎng)的最大值是多少。
（1）數(shù)據(jù)“10，1，3，2，4，5，3，7，3，5，1，5，2，7，3，3，4，4，3，2，2，3，3，8，5，4，1，6，2，8，9”表示的簡(jiǎn)單圖形中長(zhǎng)方形共有

4

4

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