共2 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：[求助]Var变量
1楼
lgj716330 发表于：2025/3/3 13:37:00
此主题相关图片如下：微信图片_20250303133349.png
上表中区经是不固定的，可能随时会变，所以做了个var变量引用
Dim qjs As list(Of String()) = DataTables("区经档案").GetValues("区域|区经")
For Each qj As String() In qjs
Dim drs As List(Of DataRow) = DataTables("区经档案").Select("区域='" & qj(0) & "' and 区经='" & qj(1) & "'")
For n As Integer = 0 To drs.Count - 1
If n > 0 Then
Vars(drs(n)("区域")) = drs(n)("区经")
End If
Next
Next
在excel报表中通过[!区域01]引用的时候值是空的，不知道上面代码哪里有问题
2楼
有点蓝 发表于：2025/3/3 13:47:00要在生成报表之前执行这个代码，另外代码有点啰嗦了
Dim qjs As list(Of String()) = DataTables("区经档案").GetValues("区域|区经")
For Each qj As String() In qjs
Vars(qj(0)) = qj(1)
Next
共2 条记录, 每页显示 10 条, 页签:
[1]