Question

当这个开始时没有任何反应我以前从未使用过计时器所以它可能很简单我无法在网上找到我知道sql不会工作但我可以在以后再做

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    Dim connection As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\\maddog.accdb;")
    Dim todaysdate As String = String.Format("{0:dd/MM/yyyy}", DateTime.Now)
    Dim current_time As String = DateTime.Now
    Try
        connection.Open()
        Dim Sql As String = "select from bookings where (app_date=todaysdate) and (start_time= )"
        Dim command As OleDbCommand = New OleDbCommand(Sql, connection)
        Dim DataReader As OleDbDataReader = command.ExecuteReader()
        If DataReader.HasRows Then MsgBox("ready")
    Catch ex As OleDb.OleDbException
        MsgBox(ex.Message)
    End Try
    connection.Close()
End Sub

Answer 1

与计时器的常见错误是：

您需要使用timer.enabled或timer.start启动它。
您可能需要在tick处理程序中重置计时器，具体取决于计时器和属性设置的类型。（有定时器控件，system.timers.timer和system.threading.timer，每个都有一点不同。）
您可能需要在tick处理程序中暂时禁用它，以确保它不会重新进入处理程序并导致问题。

为什么计时器不起作用

1 个答案: