VB.NET读取文本（解决乱码），实用性代码。