document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. Module SumSquareDif \'My solution to Project Euler Problem 6
  2.     Sub Main()
  3.         Dim Sum, Square As Integer
  4.         For i = 1 To 100
  5.             Sum += i ^ 2
  6.             Square += i
  7.         Next
  8.         Console.WriteLine((Square ^ 2) - Sum)
  9.     End Sub
  10. End Module
');