UC知道vb中遇到的问题
来源：百度知道 编辑：UC知道 时间：2024/05/01 11:08:23
本人现在正在学习vb，想修改数据库。现在出现两个问题：
1、当数据库和vb连接好以后，有两个文本框，用来修改数据库中对应的信息，奇怪的是，修改按钮的程序都还没写，按下修改键竟然可以修改数据，这是为什么？
2、我在网上找了一段程序，就是可以修改和添加数据库的，但是我却怎么也运行不正确，总是提示“缺少数组”，然后最后一行的tableName就被选中，可能是tableName有问题？
请高手帮我把下面的一段程序写上注释，详细一点 ，让我知道每一字都是什么意思 。其实我也找了很多书，也看了各种语句的用法，但是都没有实例程序供我研究，所以虽然明白各个语句的意思，但是更详细一点的我还是参不透，所以烦请高手帮个忙，本人一定给高分！
Dim conn As New ADODB.connection
Dim rs As New ADODB.Recordset
Dim sql As String
Dim connstr As String
Dim dbPath As String
Dim tableName As String
dbPath="d:\abc.mdb" '数据库路径
tableName="Student" '表名
connstr = "provider=microsoft.jet.oledb.4.0;data source=" & dbPath
sql = "select * from " & tableName & " where name='" & Text1 & "';"
conn.open (connstr)
rs.open sql, conn, 3, 3
If rs.recordcount = 0 Then
MsgBox "用户不存在"
rs.Close
conn.Execute "Insert Into " & tableName('&q
1、当数据库和vb连接好以后，有两个文本框，用来修改数据库中对应的信息，奇怪的是，修改按钮的程序都还没写，按下修改键竟然可以修改数据，这是为什么？
2、我在网上找了一段程序，就是可以修改和添加数据库的，但是我却怎么也运行不正确，总是提示“缺少数组”，然后最后一行的tableName就被选中，可能是tableName有问题？
请高手帮我把下面的一段程序写上注释，详细一点 ，让我知道每一字都是什么意思 。其实我也找了很多书，也看了各种语句的用法，但是都没有实例程序供我研究，所以虽然明白各个语句的意思，但是更详细一点的我还是参不透，所以烦请高手帮个忙，本人一定给高分！
Dim conn As New ADODB.connection
Dim rs As New ADODB.Recordset
Dim sql As String
Dim connstr As String
Dim dbPath As String
Dim tableName As String
dbPath="d:\abc.mdb" '数据库路径
tableName="Student" '表名
connstr = "provider=microsoft.jet.oledb.4.0;data source=" & dbPath
sql = "select * from " & tableName & " where name='" & Text1 & "';"
conn.open (connstr)
rs.open sql, conn, 3, 3
If rs.recordcount = 0 Then
MsgBox "用户不存在"
rs.Close
conn.Execute "Insert Into " & tableName('&q
conn.Execute "Insert Into " & tableName('" & Text1 & "','" & Text2 & "')"
这个Insert Into语句有问题～～～好像没有Values
小孩子没娘，说来话长 ，字几去看吧 ，看完一个点下一节
你连接的数据库里有student那张表吗？
自动修改数据的问题，你看看是不是在哪里有rs.update 这样的语句，如果没有update数据是不会进去的