For i As Integer = tbl.TopRow To tbl.BottomRow Dim rw As Row = tbl.Rows(i)
改成
For i As Integer = 0 To tbl.rows.count-1 Dim rw As Row = tbl.Rows(i)
加好友 
发短信
Post By：2019/3/21 17:59:00 [只看该作者]
