Devo eseguire una query su una tabella e come parametro devo utilizzare il valore "data" presente in controllo DateTimePicker nel Form.

Ho provato con :
Update .....
... WHERE (Agenda.data = " & kdata & ")

Dove kdata è ....

anno = Microsoft.VisualBasic.Year(DataAgenda.Text)
mese = Microsoft.VisualBasic.Month(DataAgenda.Text)
giorno = Microsoft.VisualBasic.Day(DataAgenda.Text)
kdata = New DateTime(anno, mese, giorno)