51Testing软件测试论坛

标题: 系统当前日期如何转化 [打印本页]

作者: yumo_yiran 时间: 2007-12-14 16:57
标题: 系统当前日期如何转化
小弟现在遇到一个问题，需要在一个字符串后面加注一段备注信息，此段备注信息格式为(******)即，在字符串后面加上当前年份后2位，当前月份数（二位数表示），当前日期（两位数），即假如现在的字符串是aaa，系统当前日期为2007－12－14，则完成操作以后输入编程了aaa(071214)，请教怎样实现？

作者: lantianwei 时间: 2007-12-14 17:40
string&"("right(year(now),2)&month(now)&day(now)&")"
试下,应该是这样写

[ 本帖最后由 lantianwei 于 2007-12-18 10:22 编辑 ]

作者: 村上舞!舞!舞 时间: 2007-12-17 20:55
标题: 用格式化输出
Dim str1 as string
Dim str2 as string
str1 = format(Date,"YYMMDD")
str2 = "aaa(" & str1 & ")"
msgbox str2

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)