下载
加入VIP
  • 专属下载特权
  • 现金文档折扣购买
  • VIP免费专区
  • 千万文档免费下载

上传资料

关闭

关闭

关闭

封号提示

内容

首页 VB课程设计学生信息管理系统

VB课程设计学生信息管理系统.doc

VB课程设计学生信息管理系统

陈善时
2017-10-17 0人阅读 举报 0 0 暂无简介

简介:本文档为《VB课程设计学生信息管理系统doc》,可适用于职业岗位领域

VB课程设计学生信息管理系统课程设计说明书NO学生信息管理系统课程设计目的目的是进一步培养我们综合应用VisualBasic的各种编程知识和技巧进行程序设计的能力。通过课程设计我们能达到具备设计功能较为复杂的Windows应用程序的能力。同时通过课程设计培养我们自主学习和独立创新的精神是人才培养体系中极为重要的一环。随着高校规模的不断扩大学生数量急剧增加有关学生的各种信息量也成倍增长庞大学生信息的管理工作成了高校教学管理工作中的一项重要任务一方面假如遵从以往旧式的工作方式该工作的工作量大管理繁琐既耗人力又耗物力另一方面由于计算机技术的飞速发展及应用的普及学生信息管理这样烦琐的工作更需要由计算机来完成。因此开发一套对学生信息进行管理的软件是极其重要的而且是必需的通过这样的系统可以做到信息的规范管理、科学统计和快速的查询从而减少管理方面的工作量。学生信息管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。针对高校现在存在的学生成绩管理的弊端和基本流程设计了学生成绩管理系统实现学生成绩管理的电子化减轻管理人员的负担。利用这一系统管理人员能够更好的对现有的学生成绩进行管理也方便了学生自己查询成绩同时可以避免人为错误。本模块实现的主要功能有专业信息、班级信息、学生信息及课程安排、成绩查询的功能。系统采用Visualbasic高级语言进行程序编制以SQLServer数据库为后台数据库。希望通过这次课程更清楚地了解自己的知识水平。充分的认识到自己真实情况。都说要想把学到的理论知识彻底的变成自己的东西就要不断地学习不停的实践只有彻底明白的道理和它的一切结构才不至于学的一知半解。通过这次学生信息系统的设计希望自己能把以前不会的东西学会然后把自己会的东西能充分的运用到实际课程设计当中做出理想的效果。彻底的把知识学透而不是把知识学死板了自己做这次课程设计一定会让我得到很多我在课堂上多学不到的东西。更好的完善自己为以后的学习生活以及工作奠定良好的基础。学生信息管理系统分析与设计沈阳大学课程设计说明书NO可行性分析由于本系统管理的对象单一都是在校学生且每个数据内容具有较强的关联性涉及的计算过程不是很复杂。因此比较适合于采用数据库管理。且学校用于学生管理的微机都是奔腾以上的机器在存储量、速度方面都能满足数据库运行的要求。在技术难度方面由于有指导老师的指导和相关参考文献特别是网上资料特别是参考其它程序的功能因此完全可以实现。数据库是MIS中的重要支持技术在MIS开发过程中如何选择数据库管理是一个重要的问题目前数据库产品较多每种产品都具有各自的特点和适用范围因此在选择数据库时应考虑数据库应用的特点及适用范围本系统选用的数据库语言介绍如下:VisualBasic是一种可视化的、面对对象和调用事件驱动方式的结构化高级程序设计可用于开发Windows环境下的种类应用程序。它简单易学、效率高且功能强大。在VisualBasic环境下利用事件驱动的编程机制、新颖易用的可视化设计工具可以高效、快速地开发出Windows环境下功能强大、图形界面丰富的应用软件系统。系统功能分析此学生信息管理信息系统是面向大学的管理系统其目的是对学校内的学生班级和其它信息进行统一有序的管理。班级管理信息的输入包括班级设置、年级的设置等班级管理信息管理的查询班级管理信息的修改学校基本课程信息的输入基本课程信息的修改学生课程信息的设置和修改学生成绩信息的输入学生成绩信息的修改学生成绩信息的查询学生成绩信息的统计。)系统安全性操作员在登录界面输入操作员帐号及密码进入主页面进行相应操作加强了此系统的安全可靠性。)主页界面采用视窗的风格点击菜单可以进入相应的界面对其进行相应的操作。既方便又实用)专业信息管理对所有专业信息查询并能直接实现添加记录、删除记录、刷新、打印报表等功能。沈阳大学课程设计说明书NO专业信息表包括的字段:专业号、专业名。)班级信息管理对所有班级信息查询并能直接实现添加记录、删除记录、打印报表及刷新等功能。班级信息表包括的字段:班级号专业号。)学生信息管理对全体学生信息查询或某个学生信息查询并能直接实现添加记录、删除记录、打印报表及刷新等功能。学生表包括的字段:学号、姓名、性别、出生日期、政治面貌、专业号、班级号。)课程安排管理对所有课程具体安排信息进行查询或某一科单独查询且也能够实现添加、删除记录、打印报表及刷新等功能。课程表包括的字段:课程号、课程名、专业号、开课学期、学时、教师编号。)成绩查询管理对全体的学生所有的科目成绩进行查询也能单独对某一个学生某一科进行查询并能实现添加、删除记录、打印报表及刷新还有就是能统计出补考的学生的名单及数量。成绩表包括的字段:学号、姓名、课程号、课程名、成绩、考核、教师编号、专业号、班级号。系统功能模块分析上述各功能的系统功能模块图如图。沈阳大学课程设计说明书NO学生信息管理系统课班学成系程级籍绩统信信信信管息息息息理管管管管理理理理成成年班班班学学密用绩绩级级级级籍籍码户添查课课信信查信设设加询程程息息询息置置修设信修添和的改置息改加修添管管改加理理图系统功能模块数据库分析数据库在一个信息管理系统中占有非常重要的地位数据库结构设计的好坏将直接对应用系统的效率以及实现的效果产生影响。合理的数据库结构设计可提高数据存储的效率保证数据的完整和一致。同时合理的数据库结构也将有利于程序的实现。数据库需求分析用户的需求具体体现在各种信息的提供、保证、更新和查询这就要求数据库结构能够充分满足各种信息的输出和输入。针对一般学生信息管理系统的要求通过对学生学习过程的内容和数据流程分析设计如下的数据项和数据结构:)学生基本信息:包括的数据项有:学生学号、学生姓名、性别、出身日期、班号、联系电话、入校日期、家庭地址、备注等。)班级信息:包括的数据项有:班号、所在年级、班主任姓名、所在教室等。沈阳大学课程设计说明书NO)课程基本信息:包括的数据项有:课程号、课程名称、课程类别、课程描述等。)课程设置信息:包括数据项有:年级信息、所学课程等。)学生成绩信息:包括数据项有:考试编号、所在班号、学生学号、学生姓名、所学课程、考试分数等。根据上面的数据结构、数据项和数据流程进行数据库设计。详细设计学生信息管理系统主窗体的创建()创建一个工程名为StudentMis的工程文件StudentMisvbp。()创建学生信息管理系统的主窗体MID窗体窗体名为frmMain窗体文件名为:frmMainfrm。创建主窗体的菜单利用菜单设计器来设置住窗体如下图所示。图主窗体菜单表主菜单结果表沈阳大学课程设计说明书NO对象属性属性值对象属性属性值sysMenumodifycionfoMen主菜单项名称子菜单项名称u标题系统标题修改班级信息adduserMenucourseMenu子菜单项名称主菜单项名称标题添加用户标题课程设置modifypwdMenuaddcourseMenu子菜单项名称子菜单项名称标题修改密码标题添加课程设计exitMenumodifycourseMen子菜单项名称子菜单项名称u标题退出系统标题修改课程信息sinfoMenugradecourseMenu主菜单项名称子菜单项名称标题学籍信息标题设计年级课程addsinfoMenuresultMenu子菜单项名称主菜单项名称标题添加学籍信息标题成绩管理modifysinfoMenuaddresultMenu子菜单项名称子菜单项名称标题修改学籍信息标题添加成绩信息inquiresinfoMenumodifyresultMenu子菜单项名称子菜单项名称标题查询学籍信息标题修好学籍信息classinfoMenuinquireresultMenu主菜单项名称子菜单项名称标题班级管理标题查询成绩信息addcinfoMenu子菜单项名称标题添加班级信息系统用户管理模块的创建系统用户管理模块主页实现:用户登陆用户添加修改用户密码用户登陆窗体的创建进入系统后出现如图所示用户登陆窗体用户首先输入用户名然后输入密码。如果用户次输入密码不正确将退出程序。沈阳大学课程设计说明书NO图系统登录界面成绩管理模块的创建()成绩管理模块功能分析成绩管理模块主要实现如下功能:添加成绩信息修改成绩信息查询成绩信息。()成绩信息管理模块图如下图所示。成绩信息管理添修查加改询成成成绩绩绩信信信息息息图成绩信息管理模块界面设计时添加窗体添加相关控件设置控件的相关属性来完成界面的设计要求然后调整控件的排版问题让整体达到美观的效果。界面的设计以及属性的设置如下图所沈阳大学课程设计说明书NO示。图界面设计及属性设置添加成绩信息窗体的创建选择“成绩管理添加成绩信息”菜单将出现如图所示的窗体。沈阳大学课程设计说明书NO图添加成绩信息打开添加成绩界面之后可以通过系统添加考试编号、选择学生所在的班级、添加学生的学号、姓名、考试的课程科目以及考试所得的分数。添加完事之后如果没有错误和实际相符合就可以单击“确认添加”按钮把刚刚录入的成绩及学生信息保存到系统当中。方便以后用户的查询。如果发现在录入信息的时候不小心录入了错误信息可以修改录入的信息或者用户单击“取消添加”按钮取消添加信息。控件属性的设置:根据以上的操作界面在设计时候创建窗体往窗体当中添加相关的控件调整控件的位置以达到美观优雅的设计效果添加控件的同时也要在设计界面把把各个控件的相关属性按照设计要求目的来设置好窗体中各种控件的属性列成表格的形式如下表所示。表控件属性控件属性属性取值控件属性属性取值FrmAddgradeNameFrmAddgradeLabelCaption考试编号(Form)CaptionCommandNameCommand添加成绩信息MIDChilTrueCaption取消添加dtxtTestnoNametxtTestnoLabelCaption选择班号comboGradeNamecomboGradeLabelCaption选择学号沈阳大学课程设计说明书NOtxtDirectorNametxtDirectorLabelCaption姓名txtnameNametxtnameLableCaption选择课程CommandNameCommandLableCaption输入分数Caption确定添加修改成绩信息窗体的创建这个窗体在添加成绩信息窗体的基础上又增加了两排按钮方便了用户的相关操作。查看成绩信息和修改成绩信息。如图所示。图修改成绩信息控件的属性设置:在设计操作界面的时候来设置相关控件的属性设置,修改框架的标题,让人看了之后就知道该操作界面是用来做什么的,设置该框架的Caption属性为“修改成绩信息”其他一些空间的属性按照设计要求和目的来分别设置。具体控件的属性设置如下表所示。沈阳大学课程设计说明书NO表控件属性控件属性属性取值控件属性属性取值FrmChangeNameFrmChangeLabelCaption考试编号(Form)CaptionNameCommand修改成绩信息CommandCaption取消修改MIDChilTrue记录dtxtTestnoNametxtTestnoCommangCaption删除记录comboGradeNamecomboGradeLabelCaption选择班号txtDirectorNametxtDirectorLabelCaption选择学号txtnameNamextnameLabelCaption姓名CommandCaptionLableCaption修改记录选择课程CommandCaptionLableCaption更新数据v输入分数当需要修改学生成绩信息的时候可以通过打开系统的如上界面来对成绩信息进行查看和修改点击查看成绩信息栏里面的“第一条记录”按钮或者其他几个按钮可以根据点击按钮的不同来跳转到相关的界面来显示想要的信息。如果系统当中的数据需要做相关的修改时点击修改成绩信息栏里面的按钮来修改当前系统当中的记录更新数据删除不想保存在数据库中的信息如果不是想要修改数据和更新数据库信息可以单击“取消修改记录”按钮来放弃刚刚所作出的操作。查询成绩信息窗体的创建新建一个Form窗体在窗体上加入一个Data控件其DatabaseName属性设置连接到数库RecordSource属性连接到数据库中的相关表。在窗体上加入两个Frame控件在一个上放置whTextBox控件个Label控件其Caption属性分别设为“按学号”“按姓名”“按课程”。设置有复选框。在另一个Frame控件上放置个CommandButton控件其Caption属性分别设置为“查询”、“退出查询”。完成后的整个界面如下图所示。沈阳大学课程设计说明书NO图查询成绩信息进入系统的查询成绩信息界面以后可以按照不同的方式来查询想要查看的同学的成绩信息。该系统分为按学号查询学生的成绩信息输入学生的学号之后然后单击“查询”按钮跳转到下一界面即为查询学生的成绩信息。按姓名查询学生成绩信息如截图当中显示的即为通过按姓名的方式来查询数据库中已有的学生成绩信息。在按姓名文本框当中输入“张三”然后单击“查询”按钮即可以跳到张三的成绩相关信息界面。查询完毕之后通过单击“退出查询”按钮来退出该模块。图中即为数据库中有的关于张三的成绩信息考试编号、张三的学号、班级号、所考试的课程名称和该科目的考试成绩。再有按课程名称来查看学生成绩信息。手动输入课程名称来查询相关的成绩信息。设计体会在本系统的开发过程中由于本人是初次开发软件在知识、经验方面都存在着不足。因此该系统必然会存在一些缺陷。因为对学生信息管理的整个流程的熟悉程度还不够深刻在需求分析时未能做到完全满足用户的需求。虽然网络在学生成绩管理系统中的应用不是很多在本次开发过程由于硬件的限制未能实现网络功能。尽管本管理系统存在着很多不足但其功能还是比较全面的、易于日后程序更新、数据库管理容易、界面友好、操作方便、效率高、安全性好等优点是本管理系统所必需的。相信本学生管理系统是一套学校在日常管理中必不可少的管理软件通过开发这个系统掌握了信息管理设计过程。加强了对VisualBasic的学习巩固了基本知识提高了沈阳大学课程设计说明书NO自学能力。在这次毕业设计中的最大收获并不仅是掌握了开发工具的应用而是学会了设计系统的思维方法以及与同学们之间相互帮助的精神。总之在这次设计中我知道了很多获得了很多。有了这次的学生系统的课程设计让我在课堂上学到的书本理论知识得到了更好理解。更进一步巩固了自己的知识没有这次课程设计自己一直以为自己学的还算很好一半知识自己都会但是在做课设的时候发现有很多东西运用到实践当中还不我所达不到的水平这才发现自己会得东西只是一知半解。运用到实际当中自己的欠缺还是很大。幸好很多热心的室友和同学以及老师的帮助自己通过查阅丰富的图书资源搜索丰富的网络资源设计界面设置各种控件的属性编写相关的代码。反复的调试程序才算把这个学生信息管理的系统做完。虽然刚开始时候因为很多东西不会烦躁无从下手。但是程序最后调试出来那一瞬间真的很高兴。课程设计完成了首先非常感谢学校给我们这次机会让我们扩大了知识量弥补了知识的欠缺进一步完善了自我。忠心的感谢老师在设计过程中对我孜孜不倦的教导使我的设计顺利完成。我还要感谢我的同学们在这一阶段给了我极大的帮助。参考文献沈阳大学课程设计说明书NO刘天慧等编著VisualBasic程序设计教程M北京:清华大学出版社,:萨师煊,王珊数据库系统概论M,(第三版)北京:高等教育出版社:梁伟等编VisualBasic管理信息系统项目开发实践北京:科学出版社:程斌等编VisualBasic数据库开发指南西安:电子科技大学出版社:武马群(VisualBasic程序设计M(北京:北京工业大学出版社,:陈元春VisualBasic数据库编程M北京:清华大学出版社,:蒋加伏VisualBasic程序设计教程M北京:北京邮电大学出版社:王国荣,VisualBasic与WindowsAPI讲座M北京:人民邮电出版社:刘新民,蔡琼,白康生编著VisualBasic程序设计M北京:清华大学出版社李春葆曾平编著(数据库原理与应用M北京:清华大学出版社ABlogMiningFrameworkITProfessionalJ卷次:刊期:January附录:源代码学生信息管理系统主窗体代码如下:沈阳大学课程设计说明书NOPrivateSubMDIFormLoad()MeLeft=GetSetting(AppTitle,"Settings","MainLeft",)MeTop=GetSetting(AppTitle,"Settings","MainTop",)MeWidth=GetSetting(AppTitle,"Settings","MainWidth",)MeHeight=GetSetting(AppTitle,"Settings","MainHeight",)EndSubPrivateSubMDIFormUnload(CancelAsInteger)IfMeWindowState<>vbMinimizedThenSaveSettingAppTitle,"Settings","MainLeft",MeLeftSaveSettingAppTitle,"Settings","MainTop",MeTopSaveSettingAppTitle,"Settings","MainWidth",MeWidthSaveSettingAppTitle,"Settings","MainHeight",MeHeightEndIfEndSubPrivateSubmodifycinfoMenuClick()frmModifyclassinfoShowEndSubPrivateSubmodifycourseMenuClick()frmModifycourseinfoShowEndSubPrivateSubmodifypwdMenuClick()frmModifyuserinfoShowEndSubPrivateSubmodifyresultMenuClick()frmModifyresultShowEndSubPrivateSubmodifysinfoMenuClick()frmModifysinfoShowEndSub创建公共模块。在工程资源管理器中为项目添加一个名称为Module的标准模块文件Modulebas。代码如下:PublicfMainFormAsfrmMainPublicUserNameAsStringSubMain()DimfLoginAsNewfrmLoginfLoginShowvbModalIfNotfLoginOKThen'LoginFailedsoexitappEndEndIfUnloadfLogin沈阳大学课程设计说明书NOSetfMainForm=NewfrmMainfMainFormShowEndSubPublicFunctionConnectString()AsString'returnsaDBConnectStringConnectString="FileDSN=studentinfodsn"EndFunctionPublicFunctionExecuteSQL(ByValSQLAsString,MsgStringAsString)AsADODBRecordset'executesSQLandreturnsRecordsetDimcnnAsADODBConnectionDimrstAsADODBRecordsetDimsTokens()AsStringOnErrorGoToExecuteSQLErrorsTokens=Split(SQL)Setcnn=NewADODBConnectioncnnOpenConnectStringIfInStr("INSERT,DELETE,UPDATE",UCase$(sTokens()))ThencnnExecuteSQLMsgString=sTokens()"querysuccessful"ElseSetrst=NewADODBRecordsetrstOpenTrim$(SQL),cnn,adOpenKeyset,adLockOptimistic'rstMoveLast'getRecordCountSetExecuteSQL=rstMsgString="查询到"rstRecordCount"条记录"EndIfExecuteSQLExit:Setrst=NothingSetcnn=NothingExitFunctionExecuteSQLError:MsgString="查询错误:"ErrDescriptionResumeExecuteSQLExit沈阳大学课程设计说明书NOEndFunctionPublicFunctionTesttxt(txtAsString)AsBooleanIfTrim(txt)=""ThenTesttxt=FalseElseTesttxt=TrueEndIfEndFunction系统用户管理模块的创建代码如下:OptionExplicitPublicOKAsBoolean'记录确定次数DimmiCountAsIntegerPrivateSubFormLoad()OK=FalsemiCount=EndSubPrivateSubcmdCancelClick()OK=FalseMeHideEndSubPrivateSubcmdOKClick()DimtxtSQLAsStringDimmrcAsADODBRecordsetDimMsgTextAsString'ToDo:createtestforcorrectpassword'checkforcorrectpasswordUserName=""IfTrim(txtUserNameText="")ThenMsgBox"没有这个用户请重新输入用户名~",vbOKOnlyvbExclamation,"警告"txtUserNameSetFocusElsetxtSQL="select*fromuserInfowhereuserID='"txtUserNameText"'"Setmrc=ExecuteSQL(txtSQL,MsgText)IfmrcEOF=TrueThenMsgBox"没有这个用户请重新输入用户名!",vbOKOnlyvbExclamation,"警告"txtUserNameSetFocusElse沈阳大学课程设计说明书NOIfTrim(mrcFields())=Trim(txtPasswordText)ThenOK=TruemrcCloseMeHideUserName=Trim(txtUserNameText)ElseMsgBox"输入密码不正确请重新输入~",vbOKOnlyvbExclamation,"警告"txtPasswordSetFocustxtPasswordText=""EndIfEndIfEndIfmiCount=miCountIfmiCount=ThenMeHideEndIfExitSubEndSub成绩管理模块的创建代码如下:PrivateSubCommandClick()DimmrcAsADODBRecordsetDimMsgTextAsStringDimtxtSQLAsStringIfNotTesttxt(txtClassnoText)ThenMsgBox"请输入考试编号~",vbOKOnlyvbExclamation,"警告"txtClassnoSetFocusExitSubEndIfIfNotTesttxt(comboGradeText)ThenMsgBox"请选择班号~",vbOKOnlyvbExclamation,"警告"comboGradeSetFocusExitSubEndIfIfNotTesttxt(txtDirectorText)ThenMsgBox"请输入姓名~",vbOKOnlyvbExclamation,"警告"txtDirectorSetFocusExitSubEndIf沈阳大学课程设计说明书NOifNotTesttxt(txtClassroomText)ThenMsgBox"请输入教室房间号~",vbOKOnlyvbExclamation,"警告"txtClassroomSetFocusExitSubEndIfIfNotIsNumeric(Trim(txtClassnoText))ThenMsgBox"请输入数字~",vbOKOnlyvbExclamation,"警告"ExitSubtxtClassnoSetFocusEndIftxtSQL="select*fromclassInfo"Setmrc=ExecuteSQL(txtSQL,MsgText)mrcMoveFirstWhile(mrcEOF=False)If(Trim(mrcFields())=Trim(txtClassnoText))ThenMsgBox"班号已经存在请重新输入班号~",vbOKOnlyvbExclamation,"警告"ExitSubtxtClassnoText=""txtClassnoSetFocusElsemrcMoveNextEndIfWendmrcAddNewmrcFields()=Trim(txtClassnoText)mrcFields()=Trim(comboGradeText)mrcFields()=Trim(txtDirectorText)mrcFields()=Trim(txtClassroomText)mrcUpdatemrcCloseMsgBox"添加成绩信息成功~",vbOKOnlyvbExclamation,"添加成绩信息"EndSubPrivateSubCommandClick()UnloadMeEndSub修改查询成绩模块代码如下:PrivateSubCommandClick()IfTextText=""Then沈阳大学课程设计说明书NOMsgBox"请输入内容~"Else输入内容不能为空DataRecordsetEditDataRecordsetFields()=TextTextDataRecordsetFields()=TextTextDataRecordsetFields()=textTextDataRecordsetFields()=TextTextDataRecordsetFields()=TextTextDataRecordsetFields()=TextTextDataRecordsetFields()=TextTextTextText=Str((Val(TextText)Val(TextText)Val(TextText)))DataRecordsetFields()=TextTextDataRecordsetUpdateMsgBox"修改成功"对数据库进行修改并将修改后的数据存入数据库EndIfEndSubPrivateSubCommandClick()IfTrim(TextText)=""ThenMsgBox"学号不能为空请重新输入~",vbOKOnlyvbExclamation,"警告"TextSetFocusElse输入学号不能为空DataRecordSource="select*from成绩表where学号='"TextText"'"DataRefreshIfDataRecordsetEOFThenMsgBox"学号不存在请重新输入~",vbOKOnlyvbExclamation,"警告"TextSetFocusTextText=""判断输入的学号是否存在若不存在弹出警告并请空格文本框。TextText=""TextText=""textText=""TextText=""TextText=""TextText=""TextText=""TextText=""ElseTextText=DataRecordsetFields()TextText=DataRecordsetFields()textText=DataRecordsetFields()沈阳大学课程设计说明书NOTextText=DataRecordsetFields()TextText=DataRecordsetFields()TextText=DataRecordsetFields()TextText=DataRecordsetFields()EndIfEndIf存在时调出数据库。EndSubPrivateSubCommandClick()MeHidemainShowEndSub进入主界面PrivateSubCommandClick()IfTextText=""ThenMsgBox"请输入内容~"Else判断输入是否为空mybookmark=DataRecordsetBookmarkStr$=MsgBox("是否删除当前记录,",vbOKCancel,"当前记录")IfStr$=vbOKThenDataRecordsetDeleteDataRefreshTextText=""TextText=""TextText=""textText=""TextText=""TextText=""TextText=""TextText=""TextText=""EndIf请空格文本框EndIfEndSub查询成绩代码如下:PrivateSubCommandClick()IfComboText="按学号"ThenDataRecordSource="select*from成绩表where学号='"TextText"'"DataRefreshElseDataRecordSource="select*from成绩表where姓名='"TextText"'"沈阳大学课程设计说明书NODataRefresh选择查询条件EndIfIfTextText=""ThenDataRecordSource="select*from成绩表orderby成绩desc"DataRefreshEndIfEndSubPrivateSubCommandClick()MeHidemainShowEndSub进入主界面PrivateSubFormLoad()DataRecordSource="select*from成绩表orderby成绩desc"DataRefreshEndSub沈阳大学课程设计说明书NO沈阳大学

用户评价(0)

关闭

新课改视野下建构高中语文教学实验成果报告(32KB)

抱歉,积分不足下载失败,请稍后再试!

提示

试读已结束,如需要继续阅读或者下载,敬请购买!

文档小程序码

使用微信“扫一扫”扫码寻找文档

1

打开微信

2

扫描小程序码

3

发布寻找信息

4

等待寻找结果

我知道了
评分:

/28

VB课程设计学生信息管理系统

VIP

在线
客服

免费
邮箱

爱问共享资料服务号

扫描关注领取更多福利