锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net保存mdb vb保存数据到excel

IT技术保存

用vb.net 怎样建立一个mdb数据库及一张表首先在项目vb.net保存mdb的VB.NET界面vb.net保存mdb，使用菜单【项目】--【添加引用】--【COM】
选择Microsoft ADO Ext. 2.x for DDL and Security
然后单击【确定】，完成引用 。
完整代码如下vb.net保存mdb：
Imports ADOX
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'创建空的access数据库文件--数据库文件.mdb，密码为123
Dim Mycat As Catalog = New Catalog()
Mycat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=5;Data Source= 数据库文件.mdb;Jet OLEDB:Database Password=123")
'以下代码创建一个名为“实验数据表”
Dim MyTable As ADOX.Table = New ADOX.Table'定义新表
MyTable.Name = "实验数据表"'表命名
'给表“实验数据表” 创建一个字符串字段，字段名“姓名”
MyTable.Columns.Append("姓名", , ADOX.DataTypeEnum.adWChar)
'给表“实验数据表” 创建一个整数字段，字段名“学号”
MyTable.Columns.Append("学号", ADOX.DataTypeEnum.adInteger)'追加一个数字型字段
'给字段“学号”创建一个主键“PimaryKey_Field”
MyTable.Keys.Append("学号", ADOX.KeyTypeEnum.adKeyPrimary, "学号")
Mycat.Tables.Append(MyTable) '把所有的新字段追加到表
MyTable = Nothing
Mycat = Nothing
End Sub
End Class
vb.net修改DATAGridview后保存与ACCESS错误一般是将access数据库绑定到datagridview中，要添加数据只需要datagridview1.Item(3, 0).Value=https://www.04ip.com/post/XXX这种就行了，删除修改同理 。保存到access是你已经有了一个access表吧？不然字段都要新建的 。如果要保存到数据库的话就调用sql语句链接数据库了，我找个以前的代码Dim OleDbConn As OleDbConnection = New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=保存信息\保存信息.mdb;persist security info=false")
OleDbConn.Open()
Dim adapter As New OleDbCommand("insert into 受检单位信息(检测日期,测量器具) values(#" + DateTimePicker1.Value + "#,'" + 测量器具 + "')", OleDbConn)
adapter.ExecuteNonQuery()
VB如何将程序的数据保存？VB6.0
写入vb.net保存mdb：
Open "D:\123.txt" For Output As #1 '打开XXX路径vb.net保存mdb的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表示循环读取文件的内容vb.net保存mdb，并让Text1.Text=内容
Close #1 '关闭
VB.net中读写文件主要使用System.IO命名空间 。
① 使用 File.ReadAllText 读取
【vb.net保存mdb vb保存数据到excel】Dim s As String = System.IO.File.ReadAllText("C:\a.txt")
② 使用 StreamReader 读取vb.net保存mdb，注意编码格式和写入的编码保持一致 。
Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)
Dim s As String = sr.ReadToEnd()
sr.Close()
请问如何将VB窗体中输入的信息进行保存，下次设计时可继续调用？保存到注册表中，或保存到一个文本（.txt）中，当然如果想建立库的话，建议保存在数据库中（如mdb） 。
保存到注册表，用：
SaveSetting注册表键名(你的程序名), 子程序名(某个窗口名), 参数名(如钢丝直径), 数值
从注册表中读?。?用：
GetSetting(注册表键名, 子程序名, 参数名, 默认值)'同上一条参数一致，默认值是程序第一次加载时，或读取注册表出错时，就用这个默认值 。

推荐阅读


上一篇：怎么看显卡有没有满血标志，显卡怎么看是不是满血版

下一篇：影驰显卡760ti怎么样，影驰gtx760显卡参数