改良版を作ったら速くなったぞ！最早当初の目的なんてくそくらえだ！ =================================================================================== Private Function makeSosu(ByVal lngMaxNum As Long) As String Dim str As StringBuilder = Ne…