主题：请教老师代码，先开窗口再执行代码怎么不行？

窗口Table的双击单元事件代码为何不能执行？

Forms("入院登记").Open()
Dim Multi As String = "住院号|姓名|医疗保险号|出生日期|年龄|合作医疗证号|性别|婚姻状况|身份证号|民族|职业|联系人|联系人关系|省|市县|联系人电话|地址|联系人地址|邮政编码|在职状态|工作单位|科室编码|支付类型|门诊医生编码|入院时病情|入院时间|入院诊断"
Dim Values() as String
Values = Multi.split("|")
For Index As Integer = 0 To Values.Length - 1
    Forms("入院登记").Controls(Values(Index)).Value = Tables("主窗口_Table4").Current(Values(Index))
Next

对头

正是模式窗口。。

我知道这方法，但是因为入院登记同时也是新增记录的窗口，想偷懒而已。