VB.NET读取TXT文件数据保存为数组

VB.NET编程读取txt文本文档中的数据，并把数据保存为数组，代码如下：

府谷网站制作公司哪家好，找创新互联！从网页设计、网站建设、微信开发、APP开发、自适应网站建设等网站项目制作，到程序开发，运营维护。创新互联成立于2013年到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联。

'写配件文件

Private Sub saveIni(ByVal filePath As String, ByVal str As String)

Dim sw As StreamWriter = New StreamWriter(filePath, True) 'true是指以追加的方式打开指定文件

sw.WriteLine(str)

sw.Flush()

sw.Close()

sw = Nothing

End Sub

'读配件文件

Private Function readIni(ByVal filePath As String)

Dim iniDt As New DataTable

iniDt.Columns.Add("text")

iniDt.Columns.Add("value")

Try

Dim sr As StreamReader = New StreamReader(filePath, System.Text.Encoding.Default)

Dim line As String = ""

While Not sr.EndOfStream

Dim str = sr.ReadLine()'读取当前行

iniDt.Rows.Add(New String() {

str(0),

str(1)

})

End While

sr.Close()

sr = Nothing

Catch ex As Exception

End Try

Return iniDt

End Function

VB.NET 本地保存数据

VB可以用任何格式保存文件数据不仅仅是注册表\XML\INI

甚至于未知的格式。我教你命令：

open "C:\setup.safe" for output as #1

print #1,"object"

close #1

其中setup.safe就是一个文件，后缀为.safe，当然可以改成.dat包括其他任何后缀.

object就是你要写入setup.safe的内容.

读取csv文件保存到数组 vb.net代码

csv文件可以当做文本文件来处理！

主要处理代码如下：

Dim t As String, b() As stirng, s(10) As String, cj(10) As Single

t = "" '这里是你读取的CSV文件内容

b() = Split(t, vbCrLf)

For j = 0 To 9

s(j) = b(j) '这个就是每一行的数据了

c() = Split(s(j), ",")

cj(j) = Val(c(1)) '这个就是每一行的成绩数据了

Next

'然后进行排序和显示处理

vb.net 怎么把数据库数据一条记录存入数组啊 最好给出代码

Dim da As New DataTable

Dim myda As OleDb.OleDbDataAdapter("SELECT * FROM 表“, oconnection)

myda.Fill(da)

姓名=da.Rows(0)(0) ‘张三

姓名=da.Rows(1)(0) ‘李四

姓名=da.Rows(2)(0) ‘王五

姓名=da.Rows(3)(0) ‘赵六

姓名=da.Rows(4)(0) ‘刘琦

这个不一定要用数组，直接用table就可以操作了。

vb.net保存数据

都是用SQL语句完成的

写入数据库

strSQL="INTO TABLENAME （OPTION1,OPTIN2）VALUES(VALUE1,VALUE2)";

cmd.Connection = conn;

cmd.CommandText = strSQL;

cmd.Parameters.Add(paramrs[i]);

try

{

conn.Open();

}

catch(Exception ex)

{

throw ex;

}

finally

{

cmd.Parameters.Clear();

cmd.CommandText = null;

cmd.Dispose();

conn.Close();

}

读取值

strSQL ="SELECT OPTION1，OPTION2 FROM TABLENAME";

cmd.CommandText = strSQL;

cmd.Connection = conn;

DataSet ds = new DataSet();

try

{

conn.Open();

SqlDataAdapter da = new SqlDataAdapter(cmd);

da.Fill(ds);

}

catch (Exception ex)

{

throw ex;

}

finally

{

cmd.Dispose();

conn.Close();

}

TextBox2.text = ds.Tables[0].rows[0][0].value.tostring();

新闻标题：vb.net保存数组数据 vb 保存数据
本文来源：http://cqwzjz.cn/article/dodcosp.html