需求:我想在选择主表上一行信息时，根据判断这个信息的归类，让另一个表上的某些列的数据（非全部数据列）显示在这个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
加好友 
发短信
Post By：2022/8/17 18:10:00 [显示全部帖子]
