vb.net保存数据库 vb如何保存数据

vb.net通过datagridview直接保存到数据库

保存数据库最好使用Adodb来编程实现，而不是使用控件来更新。记得将页面显示与数据分立。

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

参考文章：

这个文章中介绍的AdodbHelper类会帮助你简便的连接数据库，并且执行SQL语句进行数据库更新。

vb.net将DataGridView中的数据保存到SQL数据库

Dim ap As SqlClient.SqlDataAdapter'这个变量很重要

Private Function Save_Data() As Boolean '保存数据库的操作

Try

Me.DataGridView1.EndEdit()

' Me.BindingSource1 = Me.DataGridView1.DataSource

Me.BindingSource1.EndEdit()

Dim bd As New SqlClient.SqlCommandBuilder(ap)

ap.UpdateCommand = bd.GetUpdateCommand

ap.Update(Me.BindingSource1.DataSource)

Find(str_cmd)

Return True

Catch ex As Exception

MsgBox(ex.Message)

Return False

End Try

End Function

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如何将程序的数据保存？

VB6.0

写入：

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()