想了个方法mouse down n=0 timer1.enable=flase mouse up timer1.enable=flasetimer: n=n+1 if n=设定时间 then show end if
高错了 mouse down n=0 timer1.enable=turn才对因为手头上没有 vb环境 所以只想了个长按掉用的方法
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
n=0
timer1.enable=flase
mouse up
timer1.enable=flasetimer:
n=n+1
if n=设定时间 then
show
end if
mouse down
n=0
timer1.enable=turn才对因为手头上没有 vb环境 所以只想了个长按掉用的方法
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