2013-07-15 2 views
-1

Im пытается получить функцию DateAdd в виде строкиVB DateAdd в строку

До сих пор я получил

Dim newDate 
newDate = DateAdd("m", 1, date) 
MsgBox(newDate.ToString("d")) 

который получает объект ошибки требуется

Im пытается создать сценарий фотошоп, который получает дата и добавление на 1 месяц, затем записывается на активный текстовый слой

'Get and Change Expiry Date 
docRef.ActiveLayer = docRef.Layers(3) 
Set textItemRef = docRef.ActiveLayer.TextItem 

Dim newDate 
newDate = DateAdd("m", 1, date) 
textItemRef.Contents = newDate.ToString("d") 

Любая помощь будет отлично

+0

VBScript переменная дата не имеет 'метод ToString'. Вы на самом деле пытаетесь закодировать VB.Net вместо VBScript? – HansUp

+0

Я только что использовал '" "& DateAdd (" m ", 6, date)', но если есть лучший способ, скажите мне –

+0

Спасибо @HansUp Новый для VB и исходящий из PHP alil запутался –

ответ

0

Строка в VBA не является объектом, поэтому не существует метода ToString(), это VB.NET.

newDate = DateAdd("m", 1, date) 
MsgBox newDate 

или

MsgBox format$(newDate, "dd/mm/yyyy") 
Смежные вопросы