Equal Sums solutions

Equal Sums was solved using Visual Basic by 2 contestants. Solution sizes: average 2081 bytes (shortest: 1726; longest: 2437).