通过以下代码设置资产负债表
Dim nms As List (of String) = DataTables("会计科目").GetValues("资产部类","资产部类 is not null","[_Identify]")
For n As Integer = 0 To nms.Count-1
msgbox(nms(n))
rt.Cells(n,0).text = nms(n)
'If nms.Contains(" & like"空" & ") Then
'rt.Cells(n,0).text = Nothing
'Else
'rt.Cells(n,0).text = nms(n)
'End If
Next
Dim tb As Table = Tables("资产负债表已审")
Dim nms1 As List (of String ) = DataTables("会计科目").GetValues("负债部类","负债部类 is not null","[_Identify]")
For n1 As Integer = 0 To nms1.count-1
rt.Cells(n1,6).text = nms1(n1)
Next
从会计科目表的调取的项目名称顺序与实际报表中项目名称的顺序不一致,且无法导出word格式的是什么原因