Foxtable(狐表)用户栏目专家坐堂 → 怎样用代码把日期格式转换一下?


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

主题:怎样用代码把日期格式转换一下?

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


加好友 发短信
等级:三尾狐 帖子:698 积分:5612 威望:0 精华:0 注册:2013/4/9 6:59:00
怎样用代码把日期格式转换一下?  发帖心情 Post By:2013/5/2 16:15:00 [只看该作者]

日期控件的内容是 2013-05-02
怎样用代码把它变成2013年5月2日?

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/2 16:17:00 [只看该作者]

日期控件不可以这样做.文本框才可以.

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


加好友 发短信
等级:三尾狐 帖子:698 积分:5612 威望:0 精华:0 注册:2013/4/9 6:59:00
  发帖心情 Post By:2013/5/2 16:19:00 [只看该作者]

能不能用代码取第几位这样?

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2013/5/2 16:19:00 [只看该作者]

必须代码吗?很多基础是必须掌握嘀!

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/2 16:22:00 [只看该作者]

以下是引用comnets在2013-5-2 16:19:00的发言:
能不能用代码取第几位这样?

取第几位可以.参考帮助使用SubString http://www.foxtable.com/help/topics/1421.htm

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2013/5/2 16:25:00 [只看该作者]

误导了,设置格式不就行了

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/5/2 16:28:00 [只看该作者]

以下是引用don在2013-5-2 16:25:00的发言:
误导了,设置格式不就行了

先是数值列可以用百分号,又是日期控件可以设置格式有中文. 
咱们用的到底是不是同一款软件?

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


加好友 发短信
等级:三尾狐 帖子:698 积分:5612 威望:0 精华:0 注册:2013/4/9 6:59:00
  发帖心情 Post By:2013/5/2 16:29:00 [只看该作者]

日期控件格式里面只有date datetime longtime datelongtime这些啊 没有哪年哪月哪日这样的格式

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


加好友 发短信
等级:三尾狐 帖子:698 积分:5612 威望:0 精华:0 注册:2013/4/9 6:59:00
  发帖心情 Post By:2013/5/2 16:50:00 [只看该作者]

这代码有什么不对的地方?


Dim riqi1 As String = e.Form.Controls("日期输入框1").text

Dim parts() As String = riqi1.Split("-")

Dim riqinian As String = parts(0)
Dim riqiyue As String = parts(1)
Dim riqiri As String = parts(2)
Dim riqiq As String = riqinian & "年" & riqiyue & "月" & riqiri & "日"
output.show(riqiq)

提示错误:索引超出了数组界限

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2013/5/2 16:51:00 [只看该作者]

设置:输出格式,OK?

 回到顶部
总数 22 1 2 3 下一页