参考资料
1.vb从入门到精通
2.文档:http://wenku.baidu.com/view/f551f57101f69e3143329453.html
搭建数据库:
打开access->新建->选择空数据库-设计器创建表-设计视图
具体看入门到精通的资料的422页
最后建的东东
然后 vb链接access
过程看资料
中间的按钮代码
Private Sub Command1_Click()
Dim strSql As String
If Text1.Text <> "" Then
Adodc1.Recordset.Close
If Val(Text1.Text) > 0 Then
strSql = "select * from table1 where ID=" & Trim(Text1.Text)
End If
Adodc1.CommandType = adCmdText
Adodc1.Recordset.Open strSql
Set DataGrid1.DataSource = Adodc1
Else
Set DataGrid1.DataSource = Nothing
End If
End Sub
实在是太简单。。。我这个从来没见过的vb的秒秒钟就搞定了。。所以不写了。。