結果 : visual basic mid string function