vb.net保存数据流 vbnet imports

VB如何将程序的数据保存?

VB6.0

创新互联从2013年成立,是专业互联网技术服务公司,拥有项目网站设计、成都网站制作网站策划,项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命,1280元保靖做网站,已为上家服务,为保靖各地企业和个人服务,联系电话:028-86922220

写入:

Open "D:\123.txt" For Output As #1 '打开XXX路径的XXX文件(双引号里表示文件位置和文件名)

Print #1, Text1.Text '写入Text1的Text内容

Close #1 '关闭

读取:

Open "D:\123.txt" For Input As #1 '打开打开XXX路径的XXX文件(双引号里表示文件位置和文件名)

Do While Not EOF(1)

Line Input #1, s

Text1.Text = s

Loop 'Do...Loop表示循环读取文件的内容,并让Text1.Text=内容

Close #1 '关闭

VB.net中读写文件主要使用System.IO命名空间。

① 使用 File.ReadAllText 读取

Dim s As String = System.IO.File.ReadAllText("C:\a.txt")

② 使用 StreamReader 读取,注意编码格式和写入的编码保持一致。

Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)

Dim s As String = sr.ReadToEnd()

sr.Close()

VB中怎样保存数据(保存在VB数据库里)?

1.使用文件来记录,下次运行时读取 .2.使用数据库,可以考虑单机数据库或网络数据库 3.如果数据量小,使用注册表.

或者可以通过程序来保存:

set fs=createobject("scripting.filesystemobject")'创建文件操作对象

if fs.fileexists("C:\a.txt") then'如果C盘A.txt存在,那么读取其内容

set txt=fs.opentextfile("C:\a.txt",forreading,true)

set txtn=txt.readall

else'

set txtf=fs.createtextfile("c:\a.txt",true)'创建C盘下的a.txt

do'无限循环

wscript.sleep 1000'延时一秒

txtf.write a.text'写入文本框中内容

loop'循环结束

end if'判断结束

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保存数据流 vbnet imports
分享路径:http://ybzwz.com/article/dopheej.html