Foxtable(狐表)用户栏目专家坐堂 → [求助]启动注册窗体居中?


  共有4176人关注过本帖树形打印复制链接

主题:[求助]启动注册窗体居中?

帅哥哟,离线,有人找我吗?
逛逛
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12117 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2013/12/26 10:55:00 [显示全部帖子]

BeforeOpenProject 里

 

Dim frm As New Form1
frm.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
e.HideSplashForm = True   ‘或 frm.TopMost = True
frm.ShowDialog() '模式打开

If  bl_取消  Then
e.Cancel = True
End If

If bl_确定 Then
    '你的策略
    msgbox(str_机器码)
    msgbox(str_注册码)

End If

 

 

全局class 里 昨天少了一个代码,你把他加进去,是点击上面的关闭按钮是获取系统消息

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        If m.Msg = 161 And m.WParam = 20 Then
            bl_取消 = True
            Me.Close()
        End If
        MyBase.WndProc(m)
    End Sub

[此贴子已经被作者于2013-12-26 11:05:25编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12117 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2013/12/26 11:07:00 [显示全部帖子]

2楼又改了一下


 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12117 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2013/12/26 11:29:00 [显示全部帖子]

是的,否则点击关闭按钮,程序还是会打开。

 回到顶部