问题一：需求：窗口1的TextBox1的值不为空时，关闭窗口1后，赋值给窗口2的TextBox1的值.如何实现？问题二: 窗口1的表A和表B是模拟关联，如何按键实现，刚编辑，录入的表A和表B进行保存后，为不可编辑？
[此贴子已经被作者于2024/5/27 0:21:33编辑过]
1、窗口1beforeclose事件，把窗口1textbox1的值给窗口2的textbox1的值
问题一：需求：窗口1的TextBox1的值不为空时，关闭窗口1后，赋值给窗口2的TextBox1的值.如何实现？
Forms("窗口1").Controls("TextBox1").text = Forms("窗口2").Controls("TextBox14").text
报错提示：("窗口1")已关闭，不能调用"窗口2的TextBox14，如何处理？
需求：如果表A的选中字段，为未选中，窗口1的表A和表B的行可编辑，如果表A的选中字段，为选中，窗口1的表A和表B的行就不可编辑，如何实现？
If e.Row("选中") = 1 Then
e.Cancel = True '
End If
上面代码写在表A只在 表A有，对模拟关联的表B无效，如何让表B的关联行有效？
以下是引用lin98在2024/5/27 10:23:00的发言：
问题一：需求：窗口1的TextBox1的值不为空时，关闭窗口1后，赋值给窗口2的TextBox1的值.如何实现？
Forms("窗口1").Controls("TextBox1").text = Forms("窗口2").Controls("TextBox14").text
报错提示：("窗口1")已关闭，不能调用"窗口2的TextBox14，如何处理？
窗口1beforeclose事件
if Forms("窗口2").opened then
Forms("窗口2").Controls("TextBox14").text = Forms("窗口1").Controls("TextBox1").text
end if
以下是引用lin98在2024/5/27 10:31:00的发言：
需求：如果表A的选中字段，为未选中，窗口1的表A和表B的行可编辑，如果表A的选中字段，为选中，窗口1的表A和表B的行就不可编辑，如何实现？
If e.Row("选中") = 1 Then
e.Cancel = True '
End If
上面代码写在表A只在 表A有，对模拟关联的表B无效，如何让表B的关联行有效？
表A的prepareedit事件
If e.Row("选中") = true Then
e.Cancel = True '
End If
表B的prepareedit事件
dim r as row =tables("表A").current
If r("选中") = true Then
e.Cancel = True '
End If
表A的prepareedit事件
If e.Row("选中") = true Then
e.Cancel = True '
End If
上面代码，对表的限制有效，对表的字段绑定窗口的控件限制无效，比如文本框，如何解决？
表B的prepareedit事件
dim r as row =tables("表A").currentIf r("选中") = true Then
e.Cancel = True '
End If
这代码也限制无效，如何解决？