一个电脑编程问题!急!

来源:百度知道 编辑:UC知道 时间:2024/06/17 07:51:32
我想编一个报表查询软件啊,具体功能:
1.通过编号可查询内容
2.可修改报表内容
3.可增加或删除编号及其内容
这样的一个程序要用什么东东编啊~越简单越好...
谢谢各位咯!

用VB+ACCESS
主要代码如下:
选择需要查询的选项代码:
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False"
Adodc1.RecordSource = "select * from 长度"

Adodc1.Refresh

End Sub
查询按纽代码:
Private Sub Command5_Click()
If Option1.Value = True Then
Adodc1.RecordSource = "select *from 长度 where 本厂编号 like+'%'+'" + Text13.Text + "'+'%'"
Adodc1.Refresh
End If
增加记录代码:
Private Sub Command1_Click()

Dim ee As String
Dim ww As Byte
On Error GoTo 8
If Command1.Caption = "增加记录" Then
ee = MsgBox("确定要增加吗?", vbYesNo, "")
If ee = vbYes Then
Command1.Caption = "增加记录"
Command1.Caption = "确定"
Command2.Enabled = False
Command3.Enabled = False<