看106楼
看的有点不大明白
我能看懂这段的意思 双击标签 打开窗口来获取当前标签在数据库中的位置
这个Vars("个人事务_ID") 是通过什么方法获取到的 或者说是如何写入数据库的
Dim id As Integer = Vars("个人事务_ID")Dim tb As Table = Tables("个人事务")
If id > 0 Then '不属于新增 Dim dr As DataRow = tb.DataTable.Find("[_Identify] =" & id) If dr Is Nothing Then Return