Появилась проблема с записанием дня в переменную.

god = CInt(Year(Today)) - работает
mesac = CInt(Month(Today)) - работает
den = Day(Today) - ошибка
Как исправить?

den = CInt(Day(Today)) 

?

Нет. Это я уже пробовал.

http://www.vb6.us/tutorials/date-time-functions-visual-basic

тут смотрел?

Посмотрел, не помогло + Vb 6 и VB.net различаются.

пиши на C# +)

Рано мне :)

Проблема решена!

а чо было то хоть?

А чего не пользуешься стандартным типом .NET System.DateTime через свойства?

Решение было элементарное
den=Today.Day