Foxtable(狐表)用户栏目专家坐堂 → format的问题


  共有4323人关注过本帖树形打印复制链接

主题:format的问题

帅哥哟,离线,有人找我吗?
gaoshr
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:39 积分:408 威望:0 精华:0 注册:2013/4/5 16:56:00
format的问题  发帖心情 Post By:2013/6/10 18:14:00 [只看该作者]

Select e.DataCol.name
    Case "第一列"
        Dim ts As Date = e.DataRow("第一列")
        e.DataRow("第二列")=Format(ts,"yyyy-MM-dd")
End Select

以上代码正常,

为什么把"yyyy-MM-dd"换成"MMM"便提示调用目标异常了呢?

另外,format(#12/23/2001#,"MMM")正常,换成format(ts,"MMM")又提示调用目标异常了呢?


 回到顶部
帅哥哟,离线,有人找我吗?
lxl
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2013/6/10 19:43:00 [只看该作者]

试试 :

e.DataRow("第二列")=ts.ToString("MMM")

 

MMM格式化的结果是是:6月  或者是June,取决你的区域设置。

http://msdn.microsoft.com/zh-cn/library/8kb3ddd4(VS.80).aspx


 


 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7235 积分:40556 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/6/10 20:25:00 [只看该作者]

lxl版主驾到,又该有精彩的东西了,好久不见!
[此贴子已经被作者于2013-6-10 20:26:06编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
lxl
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:858 积分:6071 威望:0 精华:19 注册:2008/9/1 9:13:00
  发帖心情 Post By:2013/6/10 22:39:00 [只看该作者]

以下是引用程兴刚在2013-6-10 20:25:00的发言:
lxl版主驾到,又该有精彩的东西了,好久不见!
[此贴子已经被作者于2013-6-10 20:26:06编辑过]

好久不见,端午节快乐!


 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7235 积分:40556 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/6/10 22:43:00 [只看该作者]

唉,我都忘了送上祝福:端午节快乐!

 

也祝大家端午节快乐!


 回到顶部
帅哥哟,离线,有人找我吗?
gaoshr
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:39 积分:408 威望:0 精华:0 注册:2013/4/5 16:56:00
  发帖心情 Post By:2013/6/10 23:41:00 [只看该作者]

e.DataRow("第二列")=ts.ToString("MMM")

还是不行,同样是提示调度目标出现异常。什么原因?

 回到顶部
帅哥哟,离线,有人找我吗?
gaoshr
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:39 积分:408 威望:0 精华:0 注册:2013/4/5 16:56:00
  发帖心情 Post By:2013/6/10 23:55:00 [只看该作者]

行了,lxl版主,真高!太谢谢了!

端午节快乐!


 回到顶部
帅哥哟,离线,有人找我吗?
程兴刚
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:7235 积分:40556 威望:0 精华:16 注册:2008/8/31 23:23:00
  发帖心情 Post By:2013/6/10 23:56:00 [只看该作者]

if  e.DataCol.name =  "第一列"

    if e.datarow.isnull("第一列") = false
        Dim ts As Date = e.DataRow("第一列")
        e.DataRow("第二列")=ts.ToString("MMM")

    End  if

end if


 回到顶部