Guest User

Untitled

a guest
Dec 11th, 2018
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.20 KB | None | 0 0
  1. Dim strDateFormat As String
  2. strDateFormat = CreateObject("WScript.Shell").RegRead("HKCUControl PanelInternationalsShortDate")
  3.  
  4. If Format(#01/02/1911#, "Short Date") <> "01/02/11" Then 'Wrong format
Add Comment
Please, Sign In to add comment