貨輪在裝載貨物時，不相容的物品不能裝在一只箱子中。比如酸類腐蝕物品不宜和堿類腐蝕物品混裝，否則容易造成事故。物品不相容關(guān)系用如圖所示：

每一種貨物用一個整數(shù)編號表示，如第 i 物品和第 j 物品不相容，則表第 i 行 j 列和第j 行 i 列的值均為 1。如 1 號物品和 3 號物品不相容，則表中第 1 行第 3 列，第 3 行第1 列的值均為 1。小明設(shè)計了一個 VB 程序檢查 n 張貨物裝箱清單是否合理（檢查每張裝箱單中是否有不相容的物品）。數(shù)組 a 依次存儲各裝箱清單中的物品編號（1～m 的整數(shù)），每張清單的物品數(shù)量依次存儲在數(shù)組 b 中。如 b（1）=3，表示第 1 張裝箱清單有 3 件物品。
請回答下列問題：
（1）如物品不相容關(guān)系如下所示，有 3 張裝箱清單，b（1）=3，b（2）=3，b（3）=4，數(shù)組 a 的值依次是 6，2，3，1，4，3，4，2，5，1，則不合理的清單數(shù)量是

1

1

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