BASICなら古式にのっとりスパゲッティ・プログラムかけ！ってことだろ。
そいやVBにはGOSUBないなあ。