VB 编程 类型转换
在VB中有一个时间变量logdate传入现在需要将这个时间变量转换为字符串格式例如logdate值为2005-05-050:00:00转换为20050505当中的过程要怎...
在VB中 有一个时间变量logdate传入 现在需要将这个时间变量转换为字符串格式
例如 logdate 值为 2005-05-05 0:00:00
转换为 20050505
当中的过程要怎么写? 展开
例如 logdate 值为 2005-05-05 0:00:00
转换为 20050505
当中的过程要怎么写? 展开
展开全部
你的意思是不要那个 0:00:00了?还是其他的时间还要?
按我的理解先这样吧,首先你将logdate转为字符串,然后进行操作:代码如下:
slong=cstr(logdate)
sfront = Format(slong, "yyyymmdd")
sback = Format(slong, "Long time")
sback = Replace(sback, ":", "")
Print sfront + sback
上面代码显示的是 2005050500000,时间不同显示会不同
如果只要20050505,只要签名的代码即可
slong=cstr(logdate)
sfront = Format(slong, "yyyymmdd")
Print sfront
按我的理解先这样吧,首先你将logdate转为字符串,然后进行操作:代码如下:
slong=cstr(logdate)
sfront = Format(slong, "yyyymmdd")
sback = Format(slong, "Long time")
sback = Replace(sback, ":", "")
Print sfront + sback
上面代码显示的是 2005050500000,时间不同显示会不同
如果只要20050505,只要签名的代码即可
slong=cstr(logdate)
sfront = Format(slong, "yyyymmdd")
Print sfront
展开全部
Private Sub Form_click()
a = #5/5/2005 1:00:00 AM#
Print Format(a, "yyyymmdd")
End Sub
a = #5/5/2005 1:00:00 AM#
Print Format(a, "yyyymmdd")
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2009-07-15
展开全部
时间变量传入后,用字符串变量接收
Private Sub Command1_Click()
a = "2005-05-05 0:00:00"
Print strdate(a)
End Sub
Private Function strdate(ByVal logdate As String)
strdate = Format(logdate, "yyyymmdd")
End Function
Private Sub Command1_Click()
a = "2005-05-05 0:00:00"
Print strdate(a)
End Sub
Private Function strdate(ByVal logdate As String)
strdate = Format(logdate, "yyyymmdd")
End Function
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询