打开项目显示窗口控件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If forms("提醒窗口").Opened=True Then '为什么是True，窗口默认是没有打开的哦，前面有打开这个窗口的代码吗？

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

[此贴子已经被作者于2020/3/26 8:02:12编辑过]

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