以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]日期设置  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185023)

--  作者：jk36 --  发布时间：2023/1/31 11:30:00 --  [求助]日期设置 此主题相关图片如下：t3.png 此主题相关图片如下：t2.png 在【增加行】按钮中进行日期设置DateTime，分不能显示，不知为何？ 此主题相关图片如下：t1.png 代码如下， With Tables("表A")     If .Current Is Nothing OrElse .Current.DataRow.RowState = DataRowState.Unchanged Then \'如果当前行未曾修改         Tables("表A").AddNew()     End If End With Dim dp1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1") dp1.DateTimeFormat = DateTimeFormatEnum.DateTime Tables("表A").Current("今天日期") = Date.Today()

--  作者：jk36 --  发布时间：2023/1/31 11:30:00 --   表属性也设置了

--  作者：jk36 --  发布时间：2023/1/31 11:31:00 --   此主题相关图片如下：t4.png

--  作者：jk36 --  发布时间：2023/1/31 11:35:00 --    下载信息  [文件大小：   下载次数： ] 点击浏览该文件:今天日期.zip

--  作者：有点蓝 --  发布时间：2023/1/31 11:36:00 --   http://www.foxtable.com/webhelp/topics/1337.htm Now 返回计算机的当前时间(含日期)。 Today 返回计算机的当前日期，不含时间。