需求:我想在选择主表上一行信息时,根据判断这个信息的归类,让另一个表上的某些列的数据(非全部数据列)显示在这个Table2下,看到这个信息的明细。
问题:这是我编辑的一个代码,请大佬帮看下,问题出在哪?本人初学,还请多多指导!
Dim httz As DataTable = DataTables("合同台账")
Dim htlx As DataCol = httz.DataColS("合同类型")
Dim htmx As DataTable = DataTables("合同清单明细")
If htlx Is Nothing Then
ElseIf htlx.Name = "劳务分包、专业分包" Then
Table2 As DataCol In htmx.DataColS("项目名称"、"项目特征"、"工作内容"、"计算规则"、"分包模式"、"单位"、"暂定工程量"、"不含税单价"、"税率"、"甲供材")
ElseIf htlx.Name = "机械租赁" Then
Table2 As DataCol In htmx.DataColS("项目名称"、"规格型号"、"分包模式"、"单位"、"暂定数量"、"暂定租赁时间"、"不含税单价"、"税率")
ElseIf htlx.Name = "其他" Then
Table2 As DataCol In htmx.DataColS("项目名称"、"分包模式"、"单位"、"暂定数量"、"暂定租赁时间"、"不含税单价"、"税率")
End If
此主题相关图片如下:1660727065871_7acce566-47fb-4f69-8853-843798c178b1.png
此主题相关图片如下:547abebc16b874b8d9718360bb71a96046d698050800e7511e8409e90214f1cdqzpcvxnlcnncqwrtaw5cqxbwrgf0yvxsb2ftaw5nxerpbmduywxrxdczmja3ndm4mf92mlxjbwfnzuzpbgvzxde2nja3mjcymdq1nzrfnuzgmddequutnkqwnc00ztg5luezmtctmzqzqjnbnzreqjrglnbuzw==.png