主题：事件提醒器

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT * From {事件提醒器} Where [事件到时] = '" & a & "' And 用户名 = '" & User.Name & "'"
dt = cmd.ExecuteReader()
If dt.DataRows.Count > 0 Then

代码

End If

我的是这样?行嘛!