結果 : visual basic mid function