新创建了一个模式窗口,但是打开之后,在几秒内自动关闭了 是怎么回事?
下面是 项目事件 AfterOpenProject 事件 请问下问题出在哪里?
此主题相关图片如下:tp3.png
If DataTables("项目基础资料表").DataRows.Count = 0 Then
Dim Result As DialogResult
Result = MessageBox.Show("暂无项目,是否增加项目?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
Forms("项目基础信息界面").Show()
If DataTables("项目基础资料表").DataRows.Count = 0 Then
Syscmd.Project.Exit()
Else
Forms("主界面").Show
End If
Else
Syscmd.Project.Exit()
End If
End If