某次大型活動需要給活動現(xiàn)場鋪地毯，由于地毯的尺寸不夠大和鋪設地毯的工人經(jīng)驗不足，他在鋪設過程中將各塊地毯部分鋪設區(qū)域重疊?；顒蝇F(xiàn)場可以看成由m*n個小方格組成的矩陣（m,n＜=100），每塊地毯鋪設位置由左上角（x1，y1）和右下角（x2，y2）兩個坐標確定。
小凱同學想了解每個小方格被多少塊地毯覆蓋，以便更好地調(diào)整地毯鋪設位置，編寫了VB程序，實現(xiàn)以下功能：在文本框Text1中輸入行數(shù)m,在文本框Text2中輸入列數(shù)n,在Text3中輸入每塊地毯鋪設的坐標x1，y1，x2，y2……（坐標之間逗號分隔，地毯數(shù)量不超過100），單擊計算按鈕Commmand1，在列表框List1中顯示每個小方格被多少塊地毯覆蓋。程序運行界面如圖所示。

（1）文本框Text1中輸入行數(shù)為5，在文本框Text2中輸入列數(shù)5，在Text3中輸入的地毯鋪設的坐標為s=1，1，2，2，1，2，3，3則最后輸出矩陣a（7）的值為

2

2

。（填數(shù)字）
（2）實現(xiàn)上述功能的VB程序如下，請在橫線處填入合適代碼。