关于 dtpicker 的时间控制!!!

xy2438709 2010-03-16 02:48:18
我的dtpicker 控件的默认时间是2010-3-10

如果我13日添加数据,启动程序的时候加了一下代码,时间值还是默认时间
代码如下:

Static mydate As Date
mydate = Format(Now, "yyyy-m-dd")
DTPicker1.Value = mydate

以上代码我想实现的是

在添加完一次数据时,再添加数据,时间不会回到控件的默认时间。

想知道为什么时间值改不了呀!

现在写了代码后,每次启动时间还是默认时间值。很郁闷。没有办法,就想定义个静态变量来定义时间值。

可是问题依旧!!!

还有,我还想在启动程序的时候,更改时间,在没有关闭程序的时候,这个修改的时间一直有效,不要每次修改,都要修改时

间。

主要的意思是这样的:

启动的时候,dtpicker控件的值 等于 我规定格式的当前值,在没有关闭前,我要修改时间值,时间值,在我第二次

修改前永远不变,只有从新load 后,才变成我规定格式的当前值!

希望大家帮忙教我一下,这个问题困扰我很久了。

...全文
317 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhengoodman 2010-03-18
  • 打赏
  • 举报
回复
也没弄懂什么意思。为什么我这里是好的?
建议你到别人的机器上试试。
  • 打赏
  • 举报
回复
'我在代码后面用msgbox 输出值'
输出的是什么?dtpicker1.value?
xy2438709 2010-03-17
  • 打赏
  • 举报
回复
6 楼

我的意思是在 form_load 里写了以下的代码

Static mydate As Date
mydate = Format(Now, "yyyy-m-dd")
DTPicker1.Value = mydate

还写过:
dtpicker1.value = date

dtpicker1.value = now

我的默认时间值是 2010-3-10
按道理我写了以上的代码 dtp 的值应该是当前时间 而不是默认值。

奇怪的就是 我在代码后面用msgbox 输出值,值是当前的时间,不是默认值,说明代码起了作用,已经把默认值改了过来了,但是在运行的窗体里看控件的显示值,还是默认值 2010-3-10
当改成当前的时间输入一条记录后,时间的值又回到了默认值!!!

郁闷就在这里。。。。

神马都能聊 2010-03-17
  • 打赏
  • 举报
回复
右键dtpicker选择属性,然后设置自定义格式(custom),yyyy-MM-dd 这样的格式
xrongzhen 2010-03-17
  • 打赏
  • 举报
回复
看了一遍还是没弄明白你什么意思 你的代码添加到哪个事件里了 Form_Load()还是其他的什么

赋值不会有错的,肯定是代码添加的地方不对 Msgbox中又是哪个时间 你没贴出来,怎么对比发现错误

最好举个实例,而不要“规定时间”“修改时间”的。。。
xy2438709 2010-03-17
  • 打赏
  • 举报
回复
请大家看清楚,我在msgbox 里显示值是我要的。至于 dtpicker1.value = now/date 都是不行的。不信大家可以去试试!!!
  • 打赏
  • 举报
回复
DTPicker1.Value = Date
threenewbee 2010-03-16
  • 打赏
  • 举报
回复
DTPicker1.Value = Now
xy2438709 2010-03-16
  • 打赏
  • 举报
回复
以上的代码 用 msgbox 显示是按我的格式显示正确的系统当前时间的,可是在窗体上的值却是不变的,还是默认值。。。。。郁闷!!!

1,451

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧