读取文本文件到数组
Dim array As String() = System.IO.File.ReadAllLines(path, System.Text.Encoding.Unicode)
Please follow WeChat's public account ByCAD