手头做的一个监控系统,客户需要应付检查时,使所监控的设备全部显示良好,但是界面中不允许出现这个功能的调用,偶想比如长按某键几秒,自动调用,不知是否可行,如可行,请告知方法,多谢!!

解决方案 »

  1.   

    想了个方法mouse down
    n=0
    timer1.enable=flase
    mouse up
    timer1.enable=flasetimer:
    n=n+1
    if n=设定时间 then
    show
    end if 
      

  2.   

    高错了 
    mouse down
    n=0
    timer1.enable=turn才对因为手头上没有 vb环境 所以只想了个长按掉用的方法
      

  3.   

    timer 的interval 设置1000
    timer里    static  i as ingeter
        i=i+1
        if i = 10 then '10秒
           i =0
           timer.enabled = False
           frm.show
        end if键盘按的时候控制 timer.enabled = True
                     timer.enabled = False