[VB.NET] Query con campo data

[gibra]

Probabilmente basta aggiungere gli apici:

    kdata = "'" & kdata & "'"
    WHERE (Agenda.data = " & kdata & ")