Question

vb与access

我想做一个简单的管理系统，需要VB连接数据库
不懂ACCESS，只有VB的一点基础编程基础
我想请问一下，因为考虑了这个系统比较简单（其实就是连接一点数据资料，读写一下，如登陆时需要的用户密码，又如要读写员工的工资啊考勤诸如此类的报表资料）
想请问如何快速入门，希望高手能够教我一下
或者有没实例可以让我参考一下？感谢！

Answer 1

在VB访问数据库有四种方法,可以不需要编程的可视化数据管理器,或者用数据访问对象,需要编程的
又或是用外部的应用程序等
比较常用的ADO控件
如果你是一点基础都没有,我想可能有点难办
可是先去看一点点VB中对数据库编程的常用语句
比如起码了解一下select啊fields等等的用法
不懂的可以来百度hi我,我可以给你写一点点小例子让你了解一下.
像显示报表,做一个登陆入口我这里都有
快速不快速就不知道了,不过要满足你做一个小小的管理系统还是应该OK的.

Answer 2

加ado控件及text2个，cammand1，这是读取
Dim adocn As New ADODB.Connection

Private Sub Command1_Click()
If Text1.Text = "" Then

Else
Dim rs As New ADODB.Recordset
Dim strSql As String
strSql = "select * from ss where 名字=" & Trim(Text1.Text)
adocn.Open
rs.Open strSql, adocn, 3, 3
If rs.EOF And rs.BOF Then
Text2.Text = ""

Set rs = Nothing
adocn.Close
MsgBox "没有查询到符合您要求的信息!", vbCritical + vbOKOnly, "信息"
Exit Sub
Else
Text2.Text = rs.Fields("工资")

Set rs = Nothing
adocn.Close
End If

End If
End Sub

Private Sub Form_Load()
a = InputBox("请输入账号")
b = InputBox("请输入密码")
If a = "abc" And b = "123" Then
adocn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\aa.mdb;Persist Security Info=False"
Else
End
End If
End Sub

Answer 3

买本入门的书，一般都有这种例子；还可以上网搜索，有现成做好的

Answer 4

建议你下一本VB参考书，其实采用绑定最简单，也最容易，代码比较少。