Public Class frmFlowSearch2
    Private Sub HyperlinkLabelControl5_Click(sender As Object, e As EventArgs) Handles HyperlinkLabelControl5.Click
        DateEditFrom.EditValue = Date.Today
        DateEditTo.EditValue = Date.Today
    End Sub

    Private Sub HyperlinkLabelControl4_Click(sender As Object, e As EventArgs) Handles HyperlinkLabelControl4.Click
        DateEditFrom.EditValue = Date.Today.AddDays(-1)
        DateEditTo.EditValue = Date.Today.AddDays(-1)
    End Sub
End Class