VB添加、删除或修改数据(实例)

来源:百度知道 编辑:UC知道 时间:2024/05/21 16:09:51
我有VB方面的作业,就是要创建一个学生管理系统,我用的是ACCESS的库,表格就2个字段,就是班级编号和班级名称,我需要一个运行起来能在VB的FORM界面里能直接添加,删除或修改数据库里表的数据。附图一张
怎么把所有班级显示出来啊.....咱不会搞.....需要TEXTBOX加上BUTTON搞吗???

用adodc吧连接access数据库用个或用dataGrid picturebox显示也可以举个列子
Private Sub Command1_Click()
Dim rs_findbook As New ADODB.Recordset
Dim conn As New ADODB.Connection
Dim sql As String
If Check1.Value = vbChecked Then
sql = "书名 like '%" & Trim(Text1.Text & "") & "%'"
End If
If Check2.Value = vbChecked Then
If Trim(sql) = "" Then
sql = "类别 like '%" & Trim(Combo1.Text & "") & "%'"
Else
sql = sql & "and 类别 like '%" & Trim(Combo1.Text & "") & "%'"
End If
End If
If Check3.Value = vbChecked Then
If Trim(sql) = "" Then
sql = "作者 like '%" & Trim(Text2.Text & "") & "%'"
Else
sql = sql & "and 作者 like '%" & Trim(Text2.Text & "") & "%'"
End If
End If
If Check4.Value