vb链接access数据库遇到的问题

第一次做vb程序,vb链接access数据库遇到的问题,原来表的名字不能为user。虽然access可以使用user作为表名,但是在vb中,却不能使用user作为sql的表名,因为user是vb中的一个控件的关键字。

困扰了好久的问题终于解决了,执行时,老是报from子句错误,原来是这个问题。

展开阅读全文

vb连接access数据库出现无法找到表0

11-20
Imports System.Data.OleDb Public Class Form1 Dim cn As OleDbConnection Dim da As OleDbDataAdapter Dim ds As DataSet Dim a As Integer = 0 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim cnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\db1.mdb;Persist Security Info=False" cn = New OleDbConnection(cnStr) Dim sql As String = "select * from s" da = New OleDbDataAdapter(sql, cn) ds = New DataSet da.Fill(ds, "s") DataGridView1.DataSource = ds.Tables(0) End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim cnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\db1.mdb;Persist Security Info=False" cn = New OleDbConnection(cnStr) a = a + 1 Dim m = a Dim sql As String = "insert into s(sNo,SN,Sex,Age,Dept) values ('" & m & " ','" & "21" & " ','" & "男" & " ','" & "21" & " ','" & "呵呵" & "')" da = New OleDbDataAdapter(sql, cn) ds = New DataSet da.Fill(ds, "s") DataGridView1.DataSource = ds.Tables(0) cheshi() //注释 End Sub Private Sub cheshi() Dim cnStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\db1.mdb;Persist Security Info=False" cn = New OleDbConnection(cnStr) Dim sql As String = "select * from s" da = New OleDbDataAdapter(sql, cn) ds = New DataSet da.Fill(ds, "s") DataGridView1.DataSource = ds.Tables(0) End Sub End Class ``` ``` cheshi是重新读取可以。 但是不知道为什么DataGridView1.DataSource = ds.Tables(0),这个会出现错误,无法找到表0, 我的目的是更新表。但是,在刚才那个地方会直接崩溃,不知道为什么。 应该怎么修改,谢谢。
©️2020 CSDN 皮肤主题: 大白 设计师: CSDN官方博客 返回首页
实付0元
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值