Foxtable(狐表)用户栏目专家坐堂 → [求助]报错,状态栏3自动计算上


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

主题:[求助]报错,状态栏3自动计算上

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113488 积分:577935 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/4/1 15:32:00 [显示全部帖子]

If Vars("SysUpdateAggregate") '如果变量值为true    

If Windows.Forms.Control.MouseButtons <> Windows.Forms.MouseButtons.None OrElse Windows.Forms.Control.ModifierKeys <> Windows.Forms.Keys.None Then '如果鼠标按钮被按住或者键盘功能键被按住       
Return   
End If    
Dim Str1 As String = ""    
Vars("SysUpdateAggregate") = False '把变量值为改为false。避免重复运行

 回到顶部