張老師在籌備一次班級活動，活動的場地可以看成由m*n個小方格組成的矩陣（m,n＜=100），由于活動需要，計劃給這個場地鋪上紅地毯。當前的地毯都是矩形的，但是大小不一，每塊地毯鋪設位置由左上角（x1，y1）和右下角（x2，y2）兩個坐標確定，且剛好鋪滿該矩形區域。
張老師想了解每個小方格被多少塊地毯覆蓋，以便更好地調整地毯鋪設位置，他編寫了VB程序，實現以下功能：在文本框Text1中輸入行數m,在文本框Text2中輸入列數n,在Text3中輸入每塊地毯鋪設的坐標x1，yl,x2，y2，……坐標之間逗號分隔，地毯數量不超過100），單擊計算按鈕Commmand1，在列表框List1中顯示每個小方格被多少塊地毯覆蓋。程序運行界面如圖所示。

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

2

2

。（填數字）
（2）實現上述功能的VB程序如下，請在橫線處填人合適代碼。