我用VB.net2005从一个文本文件A.TXT中读取人员名单到组合框为何显示乱码 20
我用VB.net2005从一个文本文件A.TXT中读取人员名单(普通的文本文件,每行一个人名),读到comBoBox中显示乱码,而把人名改成英文或数字就没问题,换了计算机...
我用VB.net2005从一个文本文件A.TXT中读取人员名单(普通的文本文件,每行一个人名),读到comBoBox中显示乱码,而把人名改成英文或数字就没问题,换了计算机还是一样.
Public Class Form2
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sr = Application.StartupPath + "\a.txt"
If IO.File.Exists(sr) Then
Dim srs As String
Dim srf As IO.StreamReader = IO.File.OpenText(sr)
Do While (srf.Peek <> -1)
srs = srf.ReadLine
'srs = srs.Trim
Cmb1.Items.Add(srs)
Loop
End If
End Sub
End Class
a.txt内容
张三
李四
王五
李六
文本文件用“记事本”和其它编辑软件建的的就出现汉字乱码,但是用程序自己建的文本文件然后直接读或者用文本编辑软件编辑后再读则显示正常。很郁闷,是我的机器有病毒码?如果是,为何文件内容是英文或数字则可正常读出。 展开
Public Class Form2
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sr = Application.StartupPath + "\a.txt"
If IO.File.Exists(sr) Then
Dim srs As String
Dim srf As IO.StreamReader = IO.File.OpenText(sr)
Do While (srf.Peek <> -1)
srs = srf.ReadLine
'srs = srs.Trim
Cmb1.Items.Add(srs)
Loop
End If
End Sub
End Class
a.txt内容
张三
李四
王五
李六
文本文件用“记事本”和其它编辑软件建的的就出现汉字乱码,但是用程序自己建的文本文件然后直接读或者用文本编辑软件编辑后再读则显示正常。很郁闷,是我的机器有病毒码?如果是,为何文件内容是英文或数字则可正常读出。 展开
展开全部
是你的编码方式不对
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sr = Application.StartupPath + "\a.txt"
If IO.File.Exists(sr) Then
Dim srs As String
Dim srf As New IO.StreamReader(sr, System.Text.Encoding.Default)
Do While (srf.Peek <> -1)
srs = srf.ReadLine
'srs = srs.Trim
Cmb1.Items.Add(srs)
Loop
End If
End Sub
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sr = Application.StartupPath + "\a.txt"
If IO.File.Exists(sr) Then
Dim srs As String
Dim srf As New IO.StreamReader(sr, System.Text.Encoding.Default)
Do While (srf.Peek <> -1)
srs = srf.ReadLine
'srs = srs.Trim
Cmb1.Items.Add(srs)
Loop
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询