Question

vb.net +access数据库

我是新手，正在研究vb.net连接和读取access数据库的问题

麻烦那位高手给写个简单的例子，感激不尽~~~~

就是最简单的，一个文本框TextBox1里能显示出access数据库里的一条数据就行了，然后在TextBox1里修改数值后，点保存，就把这条数据又保存到access数据库里了。

Answer 1

这问题需要写地代码不少哦...
text1等于数据库当前行的第一列信息...
还有保存按钮...
Private Sub dg_DblClick()
Text1.text = dg.Columns(0) 'dg是datagrid的名称...文本框text1等于数据表dg当前点击行的第一列信息..
保存..
Private Sub Command3_Click()

If Text1.Text = "" Or Text4.Text = "" Then
MsgBox ("空值不允许保存!")
Exit Sub
End If

If flag = 0 Then 'flag自定义的变量.

If rec.State = adStateOpen Then rec.Close '判断记录集状态，如果是打开就先关闭

SQL = "select * from jxgl where 编号 = '" + Text4.Text + "' "
rec.Open SQL, con, adOpenStatic, adLockOptimistic '打开记录集
rec.Requery
If Not rec.EOF Then
MsgBox ("编号从复!")
Exit Sub
End If

SQL = "insert into jxgl(编号) values('" + Text1.Text + "')"
con.Execute SQL
Else
SQL = "update jxgl set 编号='" + Text1.Text + ""
con.Execute SQL
End If

MsgBox "数据保存成功！", vbOKOnly