Question

求解VB获取文件修改时间的问题。。。。

x = Environ("systemdrive")
xmp = x & "\Documents and Settings\All Users\Application Data\Thunder Network\XMP"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(xmp & "\Playlists\Default.xml")
文件修改时间 = f.DateLastModified
MSGBOX 文件修改时间
居然是2010-7-30 下午 01:37:00
为什么不是 2010-7-30 13:37:00
我系统时间是24小时制的啊。。这种情况要怎么处理呢？
我加上时间格式化就行了
文件修改时间 = Format(文件修改时间, "yyyy-mm-dd H:mm:ss")

Answer 1

这跟你的系统有关，你把系统时间改为24小时制，就可满足你要求
控制面板－区域和语言选项－自定义－时间，在“时间”里面，将时间格式，小时数用“H”表示即为24小时制，如果小时数用“h”表示，即为12小时制。