#2
shsmhq2017-06-26 10:41
|
但显示汉字为乱码如何解决?逐行读取TXT文件内容且能显示汉字的代码已经有,不在此讨论。)
Imports
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s As String
s = "f:\rat.txt"
Dim file As New (s)
Dim words As String = file.ReadToEnd()
file.Close()
MsgBox(words)
End Sub
End Class
只有本站会员才能查看附件,请 登录
[此贴子已经被作者于2017-6-26 11:02编辑过]