我做了一个 图书馆管理系统 里面的查书名 作者的这个查询理论一样的 我把代码复制在下面:
3个按钮为单选按钮
Private Sub Command4_Click()
On Error GoTo error:
If Text1.Text <> "" Then
If Option1.Value Then searchSQL = "SELECT * FROM 借阅 WHERE 图书名称=" & "'" & Text1.Text & "'"
If Option2.Value Then searchSQL = "SELECT * FROM 借阅 WHERE 读者姓名=" & "'" & Text1.Text & "'"
If Option3.Value Then searchSQL = "SELECT * FROM 借阅 WHERE 读者身份证号码=" & "'" & Text1.Text & "'"
Else
MsgBox "条件不能为空"
Text1.SetFocus
End If
Adodc1.RecordSource = searchSQL
Adodc1.Refresh
If Option1.Value Then
If Adodc1.Recordset.EOF Then
MsgBox "没有这本书!"
End If
Exit Sub
End If
If Option2.Value Then
If Adodc1.Recordset.EOF Then
MsgBox "没有这位读者!"
End If
Exit Sub
End If
If Option3.Value Then
If Adodc1.Recordset.EOF Then
MsgBox "没有这个身份证号!"
End If
Exit Sub
End If
error:
MsgBox Err.Description
End Sub
那样就不只用到ACCESS 数据库了吧。
我的想法,学生的ID,姓名等等建一个表格,另外一个表是学生ID 及各科成绩表字段,当查找时做表连接就可以了。
如果纯Access实现,你可以打开Access自带的罗期福示例数据库 看看他的vba工程的建立,一目了然!
如果用网页+access,实现起来很简单!
我有网页源码。。
本人测试,已经通过IIS通过。。
其实现在有很多第三方平台都支持系统制作,完全不用技术代码,也不需要啥费用,在线就可以自定义制作,比代码写的方便多了!