Forms("主窗体").Controls("Label1").Visible = False
MyTimers("计划2").Enabled = False
Forms("主窗体").Open()
Forms("菜单窗体").Open()
Forms("停靠窗体").Open()
'提醒窗口延迟显示
BaseMainForm.Visible = True
Dim sdt As Date = Date.Now
While Date.Now < sdt.AddSeconds(0.1) '0.1秒后
Application.DoEvents
End While
Forms("遮罩窗体").Show
Forms("提醒窗体").Open()
Forms("提醒窗体").TopMost = True
Else
Forms("主窗体").Open()
Forms("菜单窗体").Open()
Forms("停靠窗体").Open()
End If
提醒窗体是独立窗体,表是副本表,不可编辑,而且在提醒窗体的AfterLoad事件中已经写了代码:Tables("提醒窗体_Table1").AllowEdit = False,Tables("提醒窗体_Table2").AllowEdit = False
提醒窗体中的表本来设置的是不可编辑,为什么启动程序后,如果提醒窗体已经打开时,双击某一单元格后就进入编辑状态,如果关闭提醒窗体再次打开提醒窗体就正常了,双击也进不了编辑状态;如果提醒窗体设置为启动程序时不打开状态时,这时如果用按钮命令打开提醒窗体也是正常的,是什么原因呢?
[此贴子已经被作者于2017/12/10 23:46:16编辑过]