主题：[求助]如何动态设置软件试用截止日期？

Dim endtoday As Date = GetConfigValue("试用日期",#12/15/2019#) 

各位老师，上面的代码是注册代码中的一句，定义的是试用日期的截止时间，现在需要把截止日期做成动态的，就是可以通过窗口的时间日期控件更改试用截止日期，请问上面的代码怎么改写？（已经在项目中新增了一个表，表名为暂定为《A表》，其中有一列用于记录截止日期，该列名称为“试用截止日期”）

请指教，谢谢