> 両方のパターンで書いてみました。
すべての点を繋ぐ場合のコードを、少し修正。

> For i = 0 To maxIndex
> 　For j = 0 To maxIndex

これだと、A⇒B 方向の線分と B⇒A 方向の線分が重ねて描画されてしまうので

For i = 0 To maxIndex - 1
　For j = i + 1 To maxIndex

の方が良さそうです。