请教ifix关闭系统的问题 点击：714 | 回复：6
我在把演示系统的退出按钮和vba代码复制过来后，总是提示我“无法关闭系统，请用。。。”个人觉得是没有找的后台程序，请问应该怎样设置或修改。谢谢了。
Private Sub bmpExit_Click()
Dim lResult As Long
Dim iResult
Dim hw&, cnt&
hw& = FindWindow("Proficy IFIX", vbNullString)
If hw& = 0 Then
MsgBox ("无法关闭演示系统。请使用 Windows任务管理器将工作台关闭。")
end if
if hw&<>0 then SendMessage(hw&,&H10,0,0&)
End Sub
或者
Private Sub bmpExit_Click()
Dim lResult As Long
Dim iResult
Dim hw&, cnt&
hw& = FindWindow("Proficy IFIX", vbNullString)
If hw& = 0 Then
MsgBox ("无法关闭演示系统。请使用 Windows任务管理器将工作台关闭。")
Else
cnt& = SendMessage(hw&, &H10, 0, 0&)
End If
End Sub
- wincc装不上，求助！
[3731] - 自动化软件擂台第三期 自控软...[2224]
- 求助西门子STEP7 PID调节问题...[2008]
- PLC编程实例之3个计数器构成...[3203]
- 什么软件能支持真正的三维组...[6191]
- 组态王6.52中画面切换是哪个...[2180]
- 组态王能生成可执行文件吗？[6853]
- 完全免费的强大组态软件“态神...[5836]
- 求助 组态王高手能给菜鸟讲一...[2191]
- 有感于组态王和力控[2156]
官方公众号
智造工程师
-
客服
-
小程序
-
公众号
工控网智造工程师好文精选
