Shocker.Proiddqd_winТак?Кавычки, разумеется, заэкранировать - даже на форуме ошибка синтаксиса видна.
И адаптер-то здесь зачем?

SqlCom = New OleDbCommand("update [Таблица1] set [Текущая] = DateDiff(\"d\", [Дата] Date())", Con)
SqlCom.ExecuteNonQuery()

Ошибка 1 Отсутствует аргумент для параметра "connection" в "Public Sub New(cmdText As String, connection As System.Data.OleDb.OleDbConnection, transaction As System.Data.OleDb.OleDbTransaction)".

Ошибка 2 Требуется запятая, ")" или допустимое продолжение выражения.

Ошибка 3 Невозможно преобразовать значение типа "System.Data.OleDb.OleDbConnection" в "System.Data.OleDb.OleDbTransaction".

[quot Артем G]iddqd_win update записывает во все поля одинаковые значения последнего элемента массива, как это исправить?



Вопрос. А что у вас в массиве UBound(datemas)? сделайте дебаг и вернитесь с результатом.

+ Me {WindowsApplication1.Form1, Text: Form1} WindowsApplication1.Form1
- datemas {Length=4} Date()
(0) #12:00:00 AM# Date
(1) #2/1/2016# Date
(2) #3/10/2016# Date
(3) #3/20/2016# Date
l #3/20/2016# Date
x 3 Long

Shocker.Pro,

Спасибо, мил человек) Так бы и расцеловал), работает! И чтобы закрепить полученные знания) такой вопрос - а если я допустим захочу посчитать разницу не с известным днём(в данном случае сейчас), а скажем с предыдущей датой из этого же столбца, как изменится запрос?