Day of the week: Difference between revisions

Line 2,983:
2112
2118</pre>
 
=={{header|VBScript}}==
<lang vb>
For i = 2008 To 2121
If Weekday(i & "-12-25") = 1 Then
WScript.StdOut.Write i
WScript.StdOut.WriteLine
End If
Next
</lang>
 
{{Out}}
<pre>
2011
2016
2022
2033
2039
2044
2050
2061
2067
2072
2078
2089
2095
2101
2107
2112
2118
</pre>
 
=={{header|Vedit macro language}}==
Anonymous user