Как автоматически назначить дату, когда я щелкнул в календаре, текстовому полю - PullRequest
0 голосов
/ 28 февраля 2019

Первый отпечаток - мой календарь, уже полностью функционирующий.При нажатии на любой день (любой прямоугольник, в котором есть день) я перенаправляюсь на «formteste», что является моей второй печатью.То, что я хотел бы знать, - как я могу получить значение в текстовом поле «данные», чтобы быть датой, на которую я нажал в календаре.Например, если я нажму на 5-й день февраля, идентифицируем как текстовое поле «дата», которое будет автоматически «05/02/2019».

календарь

formteste

1 Ответ

0 голосов
/ 28 февраля 2019

Если значение дня сохраняется в квадратах календаря, а месяц / год - в полях со списком, то: Создайте открытую переменную «varDay» в виде целого числа (создайте его вне формы в модуле);Когда вы щелкаете любое поле из календаря, оно сохраняет значение дня в varDay;Создайте Sub Form_Load для формы с датой;Сделайте некоторый код VBA, создайте новую переменную "varDate";Затем вы делаете что-то вроде - varDate = CStr (varDay) & "/" & CStr (Forms! FormCalendar! Month) & "/" & CStr (Forms! FormCalendar! Year);После этого дата будет сохранена как строка в этой переменной;Назначьте значение в поле: Me.Data.Value = FormatDateTime (varDate, 2);(FormatDateTime помещает строку даты в правильном формате, 2 для короткой даты).Готово

...