vb点虐 按行读取文件 vb读取文件内容

VB.NET中,现有一多行TXT文件,想按行读取全部内容,然后显示在一文体框中,代码如下

a = ""

创新互联公司坚持“要么做到,要么别承诺”的工作理念,服务领域包括:网站制作、网站设计、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的阜宁网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!

TextBox1.Text =""

FileOpen(1, Application.StartupPath()  "\file\t1.txt", OpenMode.Input)      

Do While Not EOF(1)

Input(1, a)

TextBox1.Text =TextBox1.Text   a  vbcrlf

Loop      

一次性读取

a=File.ReadAllText(Application.StartupPath()  "\file\t1.txt")

vb点虐 按行读取文件时,英文没错,但中文就出现乱码,请教为何?

Dim sr As New System.IO.StreamReader(Application.StartupPath "\1.txt",System.Text.Encoding.GetEncoding("GB2312")) 中文默认是 GB2312格式的.

vb点虐 按行读取字符串

给你一个VB2010读写文件的例子吧

Dim name As String = ""

Dim age As Integer

name = InputBox("请输入姓名")

age = InputBox("请输入年龄")

FileOpen(1, "d:\信息.txt", OpenMode.Append)

WriteLine(1, name, age)

FileClose(1)

FileOpen(1, "d:\信息.txt", OpenMode.Input)

Dim h As String

Dim j As String

Dim f As String

f = ""

h = ""

j = ""

While EOF(1) = False

f = LineInput(1)  vbCrLf  f

End While

FileClose(1)

MsgBox("姓名"  "  "  "年龄"  vbCrLf  f)

vb点虐 中如何按行读取一张表中的每一列的值

定义一个表对象,定义一个连接对象,定义一个连接字符串变量;

然后定义一个查询字符串变量,你对照着例子,拼出来一个连接对象;

打开连接,执行查询并填充结果到表对象。

然后,按照表里面的顺序,一行一行的读取每一列的值。

请照着例子学。


分享标题:vb点虐 按行读取文件 vb读取文件内容
网页地址:http://azwzsj.com/article/ddcgpsi.html