IFIX中一些常用功能的VBA代码.docxVIP

根据现场实际需要做适当修改后即可使用： 1.退出工作台 Option Explicit Private Declare Function FindWindow Lib user32 Alias FindWindowA a(lBylVpClassName As String, ByV al lpWindowName As String) As Long PrivateDeclare Function SendMessage Lib user32 Alias SendMessageA (ByVal hwnd As Long, ByV al wMsg As Long, ByVal wParam A