Не понимаю в чем ошибка! - VB

Узнай цену своей работы

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

При нахождении среднего возраста работников, ВБ пишет ошибку 13 "Несовпадение типов", ругается на эту строку: "v = v + (Year(Date) - Year(gs1.TextMatrix(I, 4)))", ума не приложу,что делать. Вот весь код:

Решение задачи: «Не понимаю в чем ошибка!»

textual
Листинг программы
    For I = 1 To gs1.Rows - 1
        MSGBOX gs1.TextMatrix(I, 4)
        v = v + (Year(Date) - Year(gs1.TextMatrix(I, 4)))
    Next I

Оцени полезность:

8   голосов , оценка 4.25 из 5