我正在开发一个用于图像托管站点的项目,我需要找到一种方法,以便当用户按下热键调用一个函数时,它将触发一个计时器 x 秒,这将禁用该功能叫。
我已经有了功能设置和热键,我需要添加的只是在计时器计时时禁止在计时器内调用该功能。有任何想法吗?或者有可能吗?
最好的问候和非常感谢,奥罗拉
Dim run As Boolean
Sub tick() Handles Timer.Tick
If run Then
callfunction()
End If
End Sub
最简单的方法是在启动 Timer 之前设置一个布尔变量,然后在 Timer 的 Tick EventHandler 中将其重置。
像这样的东西:
Public Class Form1
Dim disableFunction As Boolean = False
Public Sub New()
' This call is required by the designer.
InitializeComponent()
' Add any initialization after the InitializeComponent() call.
Timer1.Interval = 2000 '2 second wait time
End Sub
Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
Timer1.Stop()
disableFunction = False
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
If disableFunction Then Exit Sub
disableFunction = True
Timer1.Start()
End Sub
End Class