我从文件夹里循环获取了信息，一个一个写入table有点慢。
可以先读取数组或者list 一次性写入talbe吗？
Dim t As Table = Tables("测试表")
Dim num(, ) As Integer = {{1, 2, 3} , {4, 5, 6}, {7, 8, 9}}
Dim colName As String
For i As Integer = 0 To 2
Dim r As Row = t.AddNew()
For j As Integer = 0 To 2
If j = 0 Then
colName = "第一列"
Else If j = 1 Then
colName = "第二列"
Else
colName = "第三列"
End If
r(colName) = num(i, j)
' r(j - 1) = num(i, j)
Next
Next