Nuts, bolts and bytes

This diagram is created:               using this code:                                                                         Copy the code: Option Explicit Dim strVSDPath, filesys Dim vsoApplication, vsoDocument, vsoPages, vsoPage Dim vsoMaster1, vsoMaster2, vsoStencil Dim vsoShape1, vsoShape2, vsoConnector1 Dim itr Const visAutoConnectDirDown = 2     'Connect down. Const visAutoConnectDirLeft = 3     'Connect to the left. Const visAutoConnectDirNone = 0     'Connect without relocating the shapes. Const visAutoConnectDirRight = 4     'Connect to the right. Const visAutoConnectDirUp = 1         'Connect up....

  Here’re the fields and respective input values against which the Date to Day convertor can be tested (left-side-table): Month Day Year       Month Day Year 1 1 2010       2 28 2010 2 2 2011       4 29 2011 3 3 2012     12 30 2012 4 4           31   5 5             6 6             ...