当前位置：工控论坛 > > 产品 > 自动化软件 > GE 数字集团软件
首页 上一页 1 2 下一页 尾页

ifix运行时候，怎么用按钮加vb脚本退出workspace 点击：9373 | 回复：24



coralsweet

    
  • 精华：0帖
  • 求助：0帖
  • 帖子：11帖 | 41回
  • 年度积分：0
  • 历史总积分：129
  • 注册：2005年3月08日
发表于：2007-07-19 09:48:00
楼主
请问下，我在ifix的画面里面加一个按钮退出workspace平台，不是从运行切换到编辑，而是直接退出workspace平台，这样的话按钮上用什么vb脚本实现阿？
希望知道的能解答下，谢谢。急阿，谢谢
分享到：
收藏 邀请回答 回复楼主 举报



冷月无声

  • 精华：0帖
  • 求助：0帖
  • 帖子：3帖 | 10回
  • 年度积分：0
  • 历史总积分：69
  • 注册：2006年4月27日
发表于：2007-07-20 14:40:00
1楼
hehe  欢迎电话来巡13466510024
回复 引用 举报

deng_lp

  • 精华：5帖
  • 求助：0帖
  • 帖子：65帖 | 2669回
  • 年度积分：0
  • 历史总积分：2876
  • 注册：2001年6月19日
发表于：2007-07-20 15:27:00
2楼
呵呵，看前面文章，用FINDWINDOW来作。
回复 引用 举报

coralsweet

  • 精华：0帖
  • 求助：0帖
  • 帖子：11帖 | 41回
  • 年度积分：0
  • 历史总积分：129
  • 注册：2005年3月08日
发表于：2007-07-20 15:53:00
3楼
工控网这块都人气好差阿，我上了ifix群里面问了问题解决了，不需要多复杂，一条代码就实现了。
回复 引用 举报

苇子

  • 精华：0帖
  • 求助：0帖
  • 帖子：13帖 | 128回
  • 年度积分：0
  • 历史总积分：0
  • 注册：1900年1月01日
发表于：2007-07-20 16:06:00
4楼
是啊，我的问题没有一个人顶。郁闷。。。。
回复 引用 举报

deng_lp

  • 精华：5帖
  • 求助：0帖
  • 帖子：65帖 | 2669回
  • 年度积分：0
  • 历史总积分：2876
  • 注册：2001年6月19日
发表于：2007-07-21 13:57:00
5楼
呵呵，什么问题
回复 引用 举报

happyoicq

  • 精华：0帖
  • 求助：0帖
  • 帖子：49帖 | 1382回
  • 年度积分：0
  • 历史总积分：3120
  • 注册：2005年10月16日
发表于：2007-07-21 13:59:00
6楼
分享一下
回复 引用 举报

新生求学

  • 精华：0帖
  • 求助：0帖
  • 帖子：2帖 | 3回
  • 年度积分：0
  • 历史总积分：10
  • 注册：2007年12月28日
发表于：2007-12-28 09:26:00
7楼
能直接退出WINDOW系统吗？
回复 引用 举报

春华★秋实

  • 精华：0帖
  • 求助：0帖
  • 帖子：103帖 | 1038回
  • 年度积分：0
  • 历史总积分：3013
  • 注册：2007年5月17日
发表于：2008-01-02 10:06:00
8楼
TO www.gkzl.com：
怎么不行呢？FindWindow函数找不到啊... 
回复 引用 举报

胖丫

  • 精华：1帖
  • 求助：0帖
  • 帖子：126帖 | 971回
  • 年度积分：0
  • 历史总积分：1644
  • 注册：2007年7月23日
发表于：2008-01-25 16:40:00
9楼
参考一下ifix的例子程序。
回复 引用 举报

信徒

  • 精华：0帖
  • 求助：0帖
  • 帖子：9帖 | 290回
  • 年度积分：0
  • 历史总积分：328
  • 注册：2007年9月14日
发表于：2008-01-26 18:00:00
10楼
回复 引用 举报

春华★秋实

  • 精华：0帖
  • 求助：0帖
  • 帖子：103帖 | 1038回
  • 年度积分：0
  • 历史总积分：3013
  • 注册：2007年5月17日
发表于：2008-02-14 16:16:00
11楼
TO www.gkzl.com：
您说的可能是V2.1的吧？？
我的IFIX是4.0的，怎么写VB?
回复 引用 举报

deng_lp

  • 精华：5帖
  • 求助：0帖
  • 帖子：65帖 | 2669回
  • 年度积分：0
  • 历史总积分：2876
  • 注册：2001年6月19日
发表于：2008-02-15 23:32:00
12楼
IFIX的DEMO中有退出按钮，看其DEMO中的代码，注意要加入API函数的声明。
findwindow的定义及SendMessage定义
回复 引用 举报

春华★秋实

  • 精华：0帖
  • 求助：0帖
  • 帖子：103帖 | 1038回
  • 年度积分：0
  • 历史总积分：3013
  • 注册：2007年5月17日
发表于：2008-02-18 15:21:00
13楼
TO deng_lp：
就是不指导怎么定义啊，请写一下代码好吗？谢谢
回复 引用 举报

shangzhen

  • 精华：0帖
  • 求助：0帖
  • 帖子：2帖 | 51回
  • 年度积分：0
  • 历史总积分：213
  • 注册：2005年1月12日
发表于：2008-02-19 13:29:00
14楼
在demo里面就有,印象中是在脚本编辑器的project_user里面,自己查找一下看看
回复 引用 举报

deng_lp

  • 精华：5帖
  • 求助：0帖
  • 帖子：65帖 | 2669回
  • 年度积分：0
  • 历史总积分：2876
  • 注册：2001年6月19日
发表于：2008-02-20 10:15:00
15楼
见VB6上的API工具 API Text Viewer
回复 引用 举报

待

  • 精华：0帖
  • 求助：0帖
  • 帖子：3帖 | 7回
  • 年度积分：0
  • 历史总积分：14
  • 注册：2008年2月19日
发表于：2008-02-22 16:51:00
16楼
 Application.Quit 3
加这个就行
回复 引用 举报

待

  • 精华：0帖
  • 求助：0帖
  • 帖子：3帖 | 7回
  • 年度积分：0
  • 历史总积分：14
  • 注册：2008年2月19日
发表于：2008-02-22 16:52:00
17楼
Application.Quit 3
这个语句可以直接退出工作台
回复 引用 举报

lg359913299

  • 精华：0帖
  • 求助：0帖
  • 帖子：0帖 | 1回
  • 年度积分：0
  • 历史总积分：11
  • 注册：2011年5月30日
发表于：2011-08-29 10:28:59
18楼

Dim a As Integer
a = MsgBox("是否退出监控系统?", 1 + 32 + 256, "提示")
If a = 1 Then
Dim lResult As Long
Dim iResult
Dim hw&, cnt&
hw& = FindWindow("iFix Startup", vbNullString)

If hw& = 0 Then
MsgBox ("无法关闭演示系统。请使用 Windows任务管理器将工作台关闭。")
End If
If hw& <> 0 Then cnt& = SendMessage(hw&, &H10, 0, 0&)
End If

回复 引用 举报

thomastop

  • 精华：0帖
  • 求助：0帖
  • 帖子：46帖 | 865回
  • 年度积分：390
  • 历史总积分：4076
  • 注册：2006年4月04日
发表于：2011-09-27 15:08:57
19楼

这些在演示画面里面就有的啊。。演示画面里面有很多经典的脚本。。可以去看看的

回复 引用 举报

三峰

  • 精华：0帖
  • 求助：0帖
  • 帖子：29帖 | 190回
  • 年度积分：0
  • 历史总积分：379
  • 注册：2003年10月29日
发表于：2011-09-27 15:47:38
20楼
把定义COPY下来就行了
回复 引用 举报

热门招聘
相关主题

官方公众号
智造工程师
    首页 上一页 1 2 下一页 尾页