以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助窗口中的日期输入框  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=152633)

--  作者:long086
--  发布时间:2020/7/16 23:22:00
--  求助窗口中的日期输入框
请问老师,窗口中有两个日期输入框,想实现打开窗口默认是当年的第一天,和当年的最后一天,怎么实现。
--  作者:y2287958
--  发布时间:2020/7/17 8:10:00
--  
Dim FirstDay As Date = New Date(Date.Today.Year,1,1)
Dim LastDay As Date = FirstDay.AddYears(1).AddDays(-1)