需要在VB6中编写自定义日期时间格式的说明

需要在VB6中编写自定义日期时间格式的说明,vb6,datetimepicker,Vb6,Datetimepicker,我有一个字符串: A -DDD HH:MM:SS 目前正在尝试编写一个函数,该函数将接受这个字符串以及将其转换为的格式。例如,假设我只想显示HH:MM ss(带前导零的小时+冒号+带前导零的分钟+无冒号+不带前导零的秒) 我知道对于VB6,您可能会使用类似Mid(str,int,int)的字符串函数来获取时间部分 HH:MM ss 您将如何形成此文档 J切掉严格格式化的时间部分并使用格式化功能 s = "A -??? 12:34:56" t = right$(s,8) ?format$(t

我有一个字符串:

A -DDD HH:MM:SS
目前正在尝试编写一个函数,该函数将接受这个字符串以及将其转换为的格式。例如,假设我只想显示HH:MM ss(带前导零的小时+冒号+带前导零的分钟+无冒号+不带前导零的秒)

我知道对于VB6,您可能会使用类似Mid(str,int,int)的字符串函数来获取时间部分

HH:MM ss
您将如何形成此文档


J

切掉严格格式化的时间部分并使用格式化功能

s = "A -??? 12:34:56"
t = right$(s,8)

?format$(t, "HH:NN ss")
12:34 56

?format$(t, "HH:NN ss AM/PM")
12:34 56 PM

?format$(t, "H, N, S  AM/PM")
12, 34, 56  PM

(此处N为分钟)

切掉严格格式化的时间部分并使用格式化功能

s = "A -??? 12:34:56"
t = right$(s,8)

?format$(t, "HH:NN ss")
12:34 56

?format$(t, "HH:NN ss AM/PM")
12:34 56 PM

?format$(t, "H, N, S  AM/PM")
12, 34, 56  PM

(此处N为分钟)

谢谢Alex K,这正是我所需要的。欢迎光临,我刚刚注意到你实际上可以在这些中使用MMcases@AlexK.我总是忘记,再次使用美元符号的目的是什么?返回字符串的函数末尾的美元意味着它直接返回字符串,而不是通过variant返回字符串hanks a莱克斯K,这正是我所需要的。欢迎你,我刚刚注意到你可以在这些中使用MMcases@AlexK.我总是忘记,再次使用美元符号的目的是什么?返回字符串的函数末尾的美元意味着它直接返回字符串,而不是通过变量返回字符串