結果 : visual basic sub function 違い