Не проходит SQL запрос с DateDiff - Visual Basic .NET

Формулировка задачи:

Всем здравствуйте. В одном из числовых столбцов таблицы (Access) находится разница между датами пусть это будет разница между какой-то явно указанной датой и текущей

                    Листинг программы
                
 
                        
                          
                    
        Dim BDate As Date = #9/20/1961#
        DT.Clear() 'Очищаем таблицу
        Con.Open()
        SqlCom = New OleDb.OleDbCommand("UPDATE [Таблица] SET [Числовой столбец] =  DateDiff(DateInterval.Year, BDate, Now)", Con)
        SqlCom.ExecuteNonQuery()
        SqlCom = New OleDb.OleDbCommand("SELECT * FROM [Таблица]", Con) ' Указываем строку запроса и привязываем к соединению
        SqlCom.ExecuteNonQuery() 'Выполняем запрос
        DA = New OleDb.OleDbDataAdapter(SqlCom) 'Через адаптер получаем результаты запроса
        DA.Fill(DT) ' Заполняем таблицу результатми
        DatagridView1.DataSource = DT ' Привязываем Грид к источнику данных
        Con.Close()

компилятор останавливается на строке#5 с сообщением: Отсутствует значение для одного или нескольких требуемых параметров.

Решение задачи: «Не проходит SQL запрос с DateDiff»

textual
                            Листинг программы 
                        
DateDiff(DateInterval.Year, BDate, Now)