以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  窗体问题  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=138876)
--  作者：lzm
--  发布时间：2016/8/29 15:03:32
--  窗体问题
看了你们的官方教学视频，然后把下面这点窗体代码写下来，之后运行，为什么不会像视频中一样切换。按钮点了没反应，请问哪里出了问题。我代码都一模一样的


Sub frmControl_cmdStop_Click()            \'主控策略暂停或运行
    if frmControl_cmdStop.Caption="运行中" then
       iRun=0   \'暂停
       frmControl_cmdStop.Caption="暂停中"
       frmControl_cmdStop.backcolor=rgb(255,0,0)
    else
       iRun=1   \'运行
       frmControl_cmdStop.Caption="运行中"
       frmControl_cmdStop.backcolor=rgb(0,255,0)
    end if
End Sub
--  作者：王锋
--  发布时间：2016/8/29 15:47:03
--  
Sub frmControl_cmdStop_Click()            \'主控策略暂停或运行
 
  这里加APPLICATION.MSGOUT调试代码，看看有没有执行到这里 
 
 
    if frmControl_cmdStop.Caption="运行中" then
       iRun=0   \'暂停
       frmControl_cmdStop.Caption="暂停中"
       frmControl_cmdStop.backcolor=rgb(255,0,0)
    else
       iRun=1   \'运行
       frmControl_cmdStop.Caption="运行中"
       frmControl_cmdStop.backcolor=rgb(0,255,0)
    end if
End Sub