以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]读取txt文件出现乱码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=136833)

--  作者：klkingkkk --  发布时间：2019/6/22 15:10:00 --  [求助]读取txt文件出现乱码 Dim dlg As New OpenFileDialog dlg.MultiSelect = True If dlg.ShowDialog = DialogResult.OK Then     Dim strs As String = FileSys.ReadAllText(dlg.FileName)                MessageBox.Show(strs) End If 这样读取出来后就是乱码,应该怎么解决啊!!!谢谢大神!!!!!!!

--  作者：有点蓝 --  发布时间：2019/6/22 15:21:00 --   设置编码：http://www.foxtable.com/webhelp/topics/0344.htm FileSys.ReadAllText(dlg.FileName,Encoding.UTF8)

--  作者：klkingkkk --  发布时间：2019/6/22 15:47:00 --   谢谢!!刚刚弄好了 现在就是怎么把读取到的字符串写到控件里面啊!!再麻烦一下..  谢谢!!!!!! Dim dlg As New OpenFileDialog dlg.MultiSelect = True If dlg.ShowDialog = DialogResult.OK Then        Dim strs As String = FileSys.ReadAllText(dlg.FileName,Encoding.Default)        Dim trs=strs.IndexOf("号牌号码")+5                         strs = strs.SubString(trs,7) End If [此贴子已经被作者于2019/6/22 15:47:40编辑过]

--  作者：有点蓝 --  发布时间：2019/6/22 15:51:00 --   比如：e.from.controls("textbox1").text = strs.SubString(trs,7)

--  作者：klkingkkk --  发布时间：2019/6/22 16:01:00 --   谢谢!!!!弄好了 感谢!!!