Говнокод

dsovpr = IIf(DateTimePicker2.Checked = True, " '" & CDate(Mid(DateTimePicker2.Value, 1, 10)) & "'", "null")
god = Year(dsovpr)

Ну вы поняли, да? Мой "коллега" берет дату из датаТаймПикера, неявно преобразует её в строку и отрезает время. А сразу после этого он пытается эту строку неявно преобразовать в дату и выдернуть оттуда год(уж не знаю чем ему Mid во второй раз не угодил).
Ах да, весь этот зоопарк нифига не работает, потому что он заключает дату в одинарные кавычки для того чтобы сохранить её в базе в виде строки(!). И, естественно, на второй строке вылетает исключение от которого все крашится, потому что использовать try catch ему, видимо, не позволяет религия

Запостил: