以下是引用狐狸爸爸在2011-11-3 15:11:00的发言:
你的查询语句是:
Select 结算年,结算月,业务建立时间,建立人,业务类型,经办班组,业务完成时间,备注说明,主键 From {自修项目} UNION Select 结算年,结算月,业务建立时间,建立人,业务类型,经办班组,业务完成时间,备注说明,主键 From {运维项目}
说明查询表根本就没有_Identify列。
这种组合查询也没有办法将_Identify列包括进来的。
要不给每个表加一个任务编号列,不同的表不同的任务编号,例如自修项目表这样编号:zx001,zx002,zx003,运维项目表则这样编号:yw001,yw002,yw003
不是不是。。你看底下的。。。上面的已经过去时了。。。
我在双击事件里加入的这个,直接找其他表的主键,和查询表没关系了吧:
列名如果是_identity的话就报错,一般列的话就可以
Dim id As String = e.Row("主键")
If e.Row("业务类型") = "自修项目" Then
With Tables("自修项目")
Dim r As Integer
r = .Find(id, .RowSel + 1, "列名", False, True, True) '搜索定位某列内容为id的行
.Position = r '则选择该行
Forms("自修_信息").open
End With
End If
[此贴子已经被作者于2011-11-3 15:17:00编辑过]