Hour Function

From Office VBScript