主题：关于读取文本文件

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.rar

求助：读取指定的文本文件，并放入相应的字段

Dim s As string = FileSys.ReadAllText("c:\data\table.txt")

Tables("XXX").Current("yyyy") = s

是要把文本文件里的内容拆分开分别送给当前表的其中几个字段，不是把文本文件的整体内容赋值给某个字段。例子窗口中有说明的。

要读取的文本文件（wz.txt）是以逗号为分隔符的，我已经传了上来，在项目文件夹下。

Dim s() As string = FileSys.ReadAllText("c:\data\table.txt").split(",")

Tables("XXX").Current("姓名") = s(0).Trim()
Tables("XXX").Current("性别") = s(1).Trim()
Tables("XXX").Current("名族") = s(2).Trim()

....

此主题相关图片如下：1.jpg

执行后怎么显示这样（文本框内没有内容），是不支持汉字吗？

Dim s() As String = FileSys.ReadAllText("c:\wz.txt", Encoding.Default).Split(",")

 顶！