二楼的解释很清楚啊:
Dim drs As List(of DataRow) = DataTables("表A").Select("第一列 = "& i-1 &"")
得到的永远是一行,j每次都是从0循环到0,所以 nr("第二列") = j ,会使得第二列永远等于0
没有看明白你第二列要存一个什么值,而且你的drs.Count是永远等于1的。