请高手帮我做一个vb学生成绩查询系统！在线等~高分谢

Question

请高手帮我做一个vb学生成绩查询系统！在线等~高分谢，做好，再加分也可以，谢谢啦

Answer 1

vb电脑已经没有了，很简单的程序。自己研究一下做做.
步骤：
1.连接数据库

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db_ExpStu.mdb;Persist Security Info=False"
’连接字符串
Adodc1.RecordSource = "select * from tb_stu " ‘查询所有数据
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1 ‘在DATAGRID1中显示出来

2.查询

查询主要代码
Private Sub Cmd_Find_Click()
If Text1.Text = "" Then
MsgBox "请输入要查询的学生编号", , "信息提示"
Text1.Text = ""
Text1.SetFocus
Exit Sub
Else
MyInt = Val(Trim(Text1.Text)) '给变量赋值
Adodc1.RecordSource = "select * from tb_stu where 年龄= " + Str(MyInt) + ""
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
End If
End Sub

Answer 2

给我发消息，我帮你做。

Answer 3

我有vb学生成绩查询系统

Answer 4

就只查？

==