我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net怎么存储数据 vb中的数据如何保存在excel

vb.net保存数据

都是用SQL语句完成的

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

写入数据库

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储存文本数据方法

Private Sub Command1_Click()

'写文件示例

Dim strFileName As String '文件名

Dim lngHandle As Long '句柄

Dim strWrite As String '要写入的文本内容

strFileName = App.Path "\a.txt"

''''''''App.Path "\a.txt"相对路径

''"c:\w.txt"绝对路径

lngHandle = FreeFile() '取得句柄

'准备要写入的内容

strWrite = Text1.Text '或者 strWrite = "这些文字将被写入文件。"

'For后面的参数表示以何种方式打开文件,Input是读取,Output是覆盖写入,Append是追加写入

''''''append是每次在文件末尾写入,不删除其它已经存在的文件.如果换成output则删除其它文件后再写入

''''''print#1,text1.text ''''''如果print换成write则写进txt中后自动加双引号

Open strFileName For Output As lngHandle '打开文件

Print #lngHandle, strWrite '写入文本

Close lngHandle '关闭文件

End Sub

Private Sub Command2_Click()

'读文件示例

Dim strFileName As String '文件名

Dim lngHandle As Long '文件句柄

Dim strAll As String '所读取的文本文件的所有内容

Dim strLine As String '在循环中存放每行的内容

strFileName = App.Path "\a.txt"

'获得文件的句柄

lngHandle = FreeFile()

'For后面的参数表示以何种方式打开文件,Input是读取,Output是覆盖写入,Append是追加写入

Open strFileName For Input As lngHandle

'循环直到文件尾

Do While Not EOF(lngHandle)

'每次读取一行存放在strLine变量中

Line Input #lngHandle, strLine

'每次读取都把所读到的内容连接到strAll变量,由于Line Input去掉了换行符,所以这里补上

strAllstrAll = strAll strLine vbCrLf

Loop

'显示得到的全部分内容

MsgBox strAll

End Sub

Private Sub Command1_Click()

Open App.Path "\a.txt" For Output As #1

Print #1, Text1.Text '这里可以是数据本身也可以是目标控件的属性

Close #1 '关闭打开的文件

End Sub

'For后面的参数表示以何种方式打开文件,Input是读取,Output是覆盖写入,Append是追加写入

append是每次在文件末尾写入,不删除其它已经存在的文件.如果换成output则删除其它文件后再写入 print#1,text1.text 如果print换成write则写进txt中后自动加双引号,以上就是数据保存为VB.NET TXT文件的代码。

VB.NET编程中用户的数据应该怎么保存?

在游戏退出时将得分、玩家名、关数、级别这些数值保存到一个

数据文件

,下次运行时再读取这些数据就可以恢复上次游戏的状态。


分享文章:vb.net怎么存储数据 vb中的数据如何保存在excel
本文来源:http://shouzuofang.com/article/docsihh.html

其他资讯