主题：打开项目显示窗口控件

老师 ，为什么我吧这段代码放到项目事件的 afteropenproject  没有任何反应呢，感谢 感谢 

If forms("提醒窗口").Opened=True Then

是的 老师，在前面有一一段弹出窗口的代码，我感觉到弹出提醒窗口后就没有执行后面的代码； 然后只有对窗口进行操作关闭后，才能执行后面的代码，而且是执行的 红色代码？

会不会是因为窗口是模式的原因。

Forms("提醒窗口").open()

If forms("提醒窗口").Opened=True Then
    'Forms("提醒窗口").Controls("Button30").PerformClick
  MessageBox.show("我执行了")
    forms("提醒窗口").Controls("PictureBox2").Visible = True
    Dim pbx As WinForm.PictureBox
    pbx = Forms("提醒窗口").Controls("PictureBox2")
    pbx.Image = GetImage(ProjectPath & "\Images\登录图片\眼睛科技感静.jpg")
    Forms("提醒窗口").Controls("PictureBox2").Dock = System.Windows.Forms.DockStyle.Fill
Else
    MessageBox.show("我没有执行")
End If