vb课程设计成绩查询

1. VB或SQL数据库课程设计学生成绩管理系统源程序和word文档谁有麻烦发一下谢谢

VB或SQL数据库课程设计学生成绩管理系统源程办
有肯定知道,才好的决定

2. 课程设计：求一个vb教务管理系统

呵呵，没有说明呀？

3. 用VB怎么编写学生成绩管理系统

我手上有access数据库的vb设计。其他数据库不知道指的什么？

4. 【高分】VB的课程设计《学生综合测评成绩管理》

请贴出xscj.txt中部分内容

5. 学生成绩查询系统 论文（vb）

学生成绩管理系统的开发
1 研究背景
1.1 研究目的
本系统的主要功能是对学校的学生的成绩进行管理。成绩管理是学校教务部门一项重要而繁杂的工作,它不仅数据多、处理量大、而且时间要求紧，牵涉到学生基本情况、学习成绩、教师情况、课程情况、任教情况、系部专业情况、班级管理、重修管理、留级处理等，因此，要求本系统能够将现有的手工作业全部电脑化，而且打印出符合教务要求的报表，、能够应用到实际应用中。系统开发的总体任务就是要实现学生信息关系的系统化、规范化，自动化，实现作业的迅速性。本系统是面向现实要求的一个实用系统,因此它具有一定的经济价值和社会价值。正如题目所言,本系统目的是对学校的学生的成绩进行管理,因此在设计本系统时,力图做到能使其真正的实用和方便。这就要求利用面向对象技术的开发方法结合原型法和结构化开发方法来编写整个学生成绩管理信息系统。
1.2 研究意义
学生成绩管理系统是一个教育单位不可缺少的部分,它的内容对于学校的决策者和管理者来说都至关重要,所以学生成绩管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理学生的成绩，这种管理方式存在着许多缺点,如:效率低、易出错等,另外时间一长,将产生大量的文件和数据与实际上的数据不符,这对于查找、更新和维护都带来了不少的困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。
数据库管理是微机应用的重要方面，几乎所有微机应用系统都离不开对数据库的管理和操作。由于数据库管理系统所服务的对象各种各样、千差万别，各个不同行业需要开发适合本单位、本部门特点的数据库管理系统，甚至一个部门也需要多个不同的管理系统，因此，通过开发自动化程度较高的通用性软件，来满足不同对象的要求。现在，随着学校学生人数的增多，人工管理学生档案工作日益繁琐，而且容易出错，为了解决这些问题，在此我根据本校特点开发了学生信息管理系统，此系统是一种自动化程度较高的通用管理软件。
2 文献综述
2.1 管理信息系统的综述
管理信息系统是一个和机器结合的人机系统，是用系统的观点，数学的方法建立起来的，以电子计算机为基础，为管理过程服务的信息系统。
3 技术路线
本系统的主要功能是对学校的学生的成绩进行管理。成绩管理是学校教务部门一项重要而繁杂的工作,它不仅数据多、处理量大、而且时间要求紧，牵涉到学生基本情况、学习成绩、教师情况、课程情况、任教情况、系部专业情况、班级管理、重修管理、留级处理等，因此，要求本系统能够将现有的手工作业全部电脑化，而且打印出符合教务要求的报表，能够应用到实际应用中。系统开发的总体任务就是要实现学生信息关系的系统化、规范化，自动化，实现作业的迅速性。
3.1 分析问题，建立模型
分析一个要由计算机解决的问题，就是要设法确定该问题最合适的模型，这是分析问题的出发点和目的。为此，首先要分析问题和题意，明确所要解决的问题属于什么类型、原始数据是什么、是怎样被加工的、经计算机处理后需要输出什么结果，然后才能建立相应的系统模型，并把解决问题的方法确定下来。
3.2 确定算法
算法是一个过程，由一组清晰的规则组成，这些规则指定了一个操作顺序，依照这个有限的步骤可以完成特定类型问题的解答。如何确定算法是计算机程序设计的重点。数据结构加算法构成程序，我们可以利用出版刊物上的程序库或计算机厂家内部建立的程序库等来源找出合适的算法或者依据实际问题和所具备的经验自己设计算法。流程图是程序设计中很有用的工具，它直观、清晰易懂，便于检查交流和修改，详细的流程图可以作为编写程序的依据，当算法确定后，还可按照车家标准用流程图画出计算机解题步骤框。
3.3 编写程序
有了算法和相应程序流程图后，就可以选定高级语言，以书面形式将算法描述出来。编写程序的结果就是形成用程序设计语言编写的源程序，编程中应尽量采用可重用技术，引用已有的程序模块，进行二次开发，以提高编程效率。
3.4 高度运行程序
完成程序清单的书写并输入到计算机以后，就可以上机调试了。调试工作主要包括排错和测试两部分。排错是指查出在程序中隐藏的错误，并给予纠正；测试是确认程序在各种可能的情况下都可以正确执行，输出结果准确无误。这两个工作往往交叉进行，不仅使用合法数据测试，而且使用非法数据或误操作测试，直到经过足够量的实例测试后达到满意效果。
3.5 建立文档资料
文档资料是计算机软件工作的重要组成部分，从接受用计算机解题任务开始就应注意和加强文档资料的编写和建立。一般地，解题任务完成，文档资料也全部建好。
3.6 程序维护
程序维护指对已经交付使用后的程序进行修改、扩充、完善等工作。当程序应用于实际工作或生活中，就得到了实践的检验，由于计算机硬件、软件环境的变更、实际需求的变化或操作人员的变动，会出现这样那样的问题需要编程人员对程序更新数据、排除隐患、修改或扩充功能等都属于维护工作。根据实际情况，我们使用原型法（Rapid Prototyping），即以少量代价快速地构造一个可执行的软件系统模型。使用户和开发人员可以较快地确定需求，然后采用循环进化的开发方式，对系统模型做连续的精细处理，将系统需具备的性质逐步加上去，直到所有的性质全部满足。此时，模块也发展成为最终产品了。
4 进度计划
5 参考文献
[1] 刘韬，骆娟等.Visual Basic 6.0数据库系统开发实例导航[M]. 人民邮电出版社，2002年4月.
[2] 刘圣才，李春葆.Visual Basic 6.0程序设计导学[M].清华大学出版社，2002年1月.
[3] Mike Geundenloy[美]著，孙月琴等译.Visual Basic开发指南[M].电子工业出版社，2000年7月.
[4] 张海藩.软件工程导论[M].清华大学出版社，1998年1月.
[5] 伍俊良.VISUAL BASIC 课程设计与系统开发案例. 北京：清华大学出版社，2002；

6. VB一门课成绩处理

如果是问问题请追问
如果帮做题，你的悬赏不够

7. 用VB怎么编写学生成绩管理系统 要源代码而且和数据库要有联系

你要自己做还是我发给你？？？代码先给你。。。Public zf1 As Integer
Private Sub cj98_Click()
Dim bh
Data2.RecordSource = "98年成绩"
Data2.Refresh
bh = Data1.Recordset.Fields("编号")
Data2.Recordset.FindFirst ("编号" = bh)
Call zf
Label13 = zf1
End SubPrivate Sub cj99_Click()
Dim bh As Integer
Data2.RecordSource = "99年成绩"
Data2.Refresh
bh = Data1.Recordset.Fields("编号")
Data2.Recordset.FindFirst ("编号" = bh)
Call zf
Label13 = zf1
End SubPrivate Sub Data1_Reposition()
Dim bh As Integer
bh = Data1.Recordset.Fields("编号")
Data2.Recordset.MoveFirst
Do While Data2.Recordset.EOF = False
If Data2.Recordset.Fields("编号") = bh Then
Exit Do
Else
Data2.Recordset.MoveNext
End If
Loop
Call zf
Label13 = zf1
End Sub
Private Sub Z1_Click()
Dim bh
Data1.DatabaseName = "C:\Documents and Settings\Administrator\桌面\db2.mdb"
Data1.Refresh
Data2.DatabaseName = "C:\Documents and Settings\Administrator\桌面\db2.mdb"
Data2.Refresh
bh = Data1.Recordset.Fields("编号")
Data2.Recordset.FindFirst ("编号" = bh)
Call zf
Label13 = zf1
End Sub
Sub zf()
zf1 = Data2.Recordset.Fields("微机原理") + Data2.Recordset.Fields("OFFICE使用") + Data2.Recordset.Fields("五笔字型打字") + Data2.Recordset.Fields("VB编程")
End Sub

8. vb学生成绩管理系统(课程设计)

加我，马上解决

9. 求VB学生成绩管理程序

1 新建1个工程
2 向窗体中添加三个标签控件，三个文本框控件，四个命令按钮控件
3 设置属性
4 代码如下：
Option Explicit
Private Type stu
sNum As String * 10
sName As String * 20
Score As String * 4
End Type

Dim gstu As stu
Dim recordlen AS Integer
Dim currentrecord As Integer
Dim lastrecord As Integer

Public Sub SaveCurrent()
gstu.sNum = txtNum.Text
gstu.sName = txtName.Text
gstu.Score = txtScore.Text
Put #1, currentrecord, gstu
End sub

Public sub showcurrent()
Get #1,currentrecord,gstu
txtnum.text=gstu.sNum
txtName.text=gstu.sName
txtScore.text=gstu.Score
End sub

Private Sub cmdAdd_Click()
SaveCurrent
lastrecord = lastrecord + 1
gstu.sNum = ""
gstu.sName = ""
gstu.Score = ""
Put #1,lastrecord, gstu
currentrecord = lastrecord
ShowCurrent
txtNum.SetFocus
End Sub

Private Sub cmdFind_Click()
Dim nsearch As String
Dim found As Boolean
Dim recnum As Long
Dim fstu As stu
nsearch = InputBox("请输入要查找的学生的学号: ","查找")
If nsearch = "" Then
Exit Sub
End If
found = False
For recnum = 1 To lastrecord
Get #1, recnum, fstu
If nsearch = Trim(fstu.sNum) Then
found = True
Exit For
End If
Next
If found = True Then
SaveCurrent

currentrecord = recnum
ShowCurrent
Else
MsgBox "无学号为" + nsearch + "的成绩"
End If
End Sub

Private Sub cmdNext_Click()
If currentrecord = lastrecord Then
Beep
MsgBox "已显示完全部成绩!", vbOKOnly + vbExclamation, "错误"
Else
SaveCurrent
currentrecord = currentrecord + 1
ShowCurrent
End If
txtNum.SetFocus
End Sub

Private Sub cmdPrevious_Click()
If currentrecord = 1 Then
Beep
MsgBox "已到文件顶部! ", vbOKOnly + vbExclamation, "错误"
Else
SaveCurrent
currentrecord = currentrecord - 1
ShowCurrent
End If
txtNum.SetFocus
End Sub

Private Sub Form_Load()
recordlen = Len(gstu)
'打开文件，注意文件路径
Open "E:\成绩\11.txt" For Random As #1 Len = recordlen
currentrecord = 1
lastrecord = FileLen("e:\成绩\11.txt") / recordlen
If lastrecord = 0 Then
lastrecord = 1
End If
ShowCurrent
End Sub

Private Sub Form_Unload(Cancel As Integer)
Close #1
End Sub

你在设计时注意格式，这个程序格式有问题网络不让空格！！！！