結果 : dim function in visual basic