【VB技巧】VB得到指定名称程序的启动时间

VB得到某个程序的启动时间，VB得到指定名称程序的启动时间：

Private Sub Command1_Click()
    Set objWMIService = GetObject("winmgmts:.rootcimv2")
    Set colProcesslist = objWMIService.ExecQuery("Select * from Win32_Process Where Name = 'qq.exe'") '获取QQ.exe的启动时间
    For Each objProcess In colProcesslist
        MsgBox objProcess.CreationDate
    Next
End Sub