以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]文件的读取  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=138136)

--  作者:Yearn
--  发布时间:2019/7/23 16:18:00
--  [求助]文件的读取
老师你好,我现在D盘有一个txt文件,我怎么将文件的最后一行数据读取出来绑定到TextBox控件里面
--  作者:有点蓝
--  发布时间:2019/7/23 16:28:00
--  
Dim s As string = FileSys.ReadAllText("c:\\data\\table.txt")
dim arr() as string = s.replace(vbcr,"").split(vblf)
Output.Show(
arr(arr.length - 1))

--  作者:Yearn
--  发布时间:2019/7/23 16:43:00
--  
老师我再问一个问题,如果把每一行的数据都读取出来怎么写
--  作者:有点蓝
--  发布时间:2019/7/23 17:22:00
--  
Dim s As string = FileSys.ReadAllText("c:\\data\\table.txt")
dim arr() as string = s.replace(vbcr,"").split(vblf)
Output.Show(s
)
for each a as string in arr
Output.Show(a)
next