VB课堂点名回答问题系统的设计与实现
- 格式:doc
- 大小:477.00 KB
- 文档页数:30
随机点名系统的设计与实现
方康年
【期刊名称】《电脑知识与技术》
【年(卷),期】2006(000)003
【摘要】本文通过在Visual Basic下对Access数据库表中记录的随机调用,达到
教师在课堂上对学生进行随机点名回答提问的目的.从而增加了对提问学生的公平、公正性,同时也起到了调动课堂教学气氛的作用.
【总页数】2页(P203-204)
【作者】方康年
【作者单位】池州师专数学系,安徽,池州,247000
【正文语种】中文
【中图分类】TP312
【相关文献】
1.课堂互动随机点名系统的设计与实现 [J], 徐碧赢;张松泓;
2.高校教学随机点名系统设计与实现 [J], 闫向阳
3.课堂随机点名系统设计与实现 [J], 石元聆
4.基于C#的随机点名系统的设计与实现 [J], 张晶
5.课堂互动随机点名系统的设计与实现 [J], 徐碧赢;张松泓
因版权原因,仅展示原文概要,查看原文内容请购买。
课堂互动随机点名系统的设计与实现作者:徐碧赢张松泓来源:《软件工程》2017年第08期摘要:学生上课考勤是教学过程中不可缺少的重要环节,各任课教师需要依靠点名来掌握学生的考勤情况,并通过课堂提问来了解学生对于课程的掌握情况。
新时代下学生个性强、上课回答问题积极性不高是当代大学生的普遍特点,为提高课堂教学的趣味性,以及学生课堂互动的积极性,设计了一款课堂互动随机点名系统。
该系统是基于C#设计开发的,界面简洁,使用方便,提高了课堂点名的效率并活跃了课堂氛围。
关键词:随机点名;课堂互动;Visual C#中图分类号:TP311 文献标识码:AAbstract:The attendance of students is an indispensable part in the teaching process.Teachers need to rely on the roll call to check student attendance,and apply questioning to learn about the students' mastery of the course content.Generally,many college students lack enthusiasm for answering questions in class.A random roll call system for classroom interaction is designed in order to enhance students' interest and initiative of classroom interaction.The system is designed and developed based on C #.With the simple and user-friendly interface,the system effectively improves the efficiency of roll call and brings active and harmonious classroom atmosphere.Keywords:random roll call;classroom interaction;Visual C#1 引言(Introduction)高校上课过程中,点名是教学过程中不可缺少的一部分,课堂提问更是促进教学互动,提高教学质量的重要环节[1]。
一、实验目的1. 了解点名系统的基本原理和功能。
2. 掌握点名系统的设计方法和技术。
3. 通过实际操作,提高对点名系统应用能力的掌握。
二、实验环境1. 操作系统:Windows 102. 开发环境:Visual Studio 20193. 数据库:MySQL 5.74. 编程语言:C#三、实验内容1. 点名系统概述2. 系统需求分析3. 系统设计4. 系统实现5. 系统测试与优化四、实验步骤1. 系统需求分析(1)功能需求① 用户登录:管理员登录和普通用户登录。
② 学生信息管理:增加、删除、修改学生信息。
③ 班级管理:增加、删除、修改班级信息。
④ 点名记录:实时记录学生出勤情况。
⑤ 数据统计:按班级、按时间统计出勤情况。
(2)性能需求① 系统响应时间:用户操作后,系统响应时间不超过2秒。
② 系统并发用户数:支持10个用户同时在线操作。
2. 系统设计(1)系统架构采用B/S(Browser/Server)架构,分为前端和后端两部分。
前端:采用HTML、CSS、JavaScript等技术实现,主要负责用户界面展示和交互。
后端:采用C#语言开发,负责业务逻辑处理和数据库操作。
(2)数据库设计① 学生信息表(student)- 学号(id):主键,自动增长- 姓名(name):字符串- 性别(gender):字符串- 班级(class_id):外键,关联班级信息表② 班级信息表(class)- 班级ID(id):主键,自动增长- 班级名称(name):字符串③ 点名记录表(attendance)- 记录ID(id):主键,自动增长- 学号(student_id):外键,关联学生信息表- 班级ID(class_id):外键,关联班级信息表- 状态(status):字符串,表示出勤情况(如:正常、迟到、缺勤等)3. 系统实现(1)前端实现使用HTML、CSS、JavaScript等技术实现用户界面,包括登录界面、学生信息管理界面、班级管理界面、点名记录界面和数据统计界面。
43 Case Else
s = "其他字符"
End Select
Label3.Caption = s
End Sub
Private Sub Form _Load()
Form1.Caption = "字符种类的判断"
Label1.Caption = "请输入一个字符"
Label2.Caption = "字符的种类"
Label3.Caption = ""
Label3.BorderStyle = 1
Text1.Text = ""
Command1.Caption = "判断"
End Sub
笔记:(请记录注意事项、纠错过程、经典代码等内容)
实验五 随机点名
【实验内容】
假设有4个班级一起上课,每班有30个学生。
请为老师设计一个小程序实现随机点名,即随机产生1~4的随机整数代表“一班”到“四班”,然后随机产生1~30的随机整数代表学号,例如被点名学生为“二班的15号”。
请根据实验提示完成实验代码。
【实验指导】
随机产生1~4的随机整数代表“一班”到“四班”,然后随机产生1~30的随机整数代表学
号,例如被点名学生为“二班的15号”。
若欲把班级代码1~4转化成“一班”到“四班”,可采用Select Case 语句来实现。
【界面设计】
界面设计如图4-7所示。
图4-7 界面设计。
VB课程设计1. 引言VB(Visual Basic)是一种面向对象的编程语言,由微软公司开发。
它结合了基本的编程概念和直观的图形用户界面,使得编写应用程序变得简单和直观。
本文将介绍VB课程设计的相关内容,包括设计目标、设计过程和实施步骤等。
2. 设计目标VB课程设计的主要目标是培养学生的编程能力和解决问题的能力。
通过设计一个实际应用程序,学生可以学习如何使用VB语言进行程序设计,并了解软件开发过程中的各个环节。
3. 设计过程VB课程设计的设计过程包括以下几个步骤:3.1 确定需求在开始设计之前,首先需要明确应用程序的需求。
这包括确定应用程序的功能、用户界面和交互方式等。
如果我们要设计一个学生成绩管理系统,需求可能包括添加学生信息、查询成绩和生成报表等功能。
3.2 设计界面在确定需求后,接下来需要设计应用程序的用户界面。
这包括确定窗体布局、控件位置和样式等。
通过使用VB提供的可视化设计器,可以方便地创建用户界面,并进行调整和修改。
3.3 编写代码界面设计完成后,就可以开始编写代码了。
VB使用基于事件的编程模型,通过响应用户的操作来触发相应的事件处理程序。
在编写代码时,需要考虑到各种可能的情况,并进行适当的错误处理。
3.4 测试和调试在编写完代码后,需要对应用程序进行测试和调试。
这包括对各个功能进行测试,检查是否存在错误和异常情况,并进行适当的修复和优化。
3.5 文档撰写在完成测试和调试后,需要撰写相应的文档。
文档内容包括应用程序的功能介绍、使用说明和技术实现等。
这有助于其他人了解和使用该应用程序。
4. 实施步骤VB课程设计的实施步骤如下:4.1 学习VB语言基础在开始设计之前,学生需要学习VB语言的基础知识。
这包括语法、数据类型、控制结构、函数和对象等。
通过学习这些知识,学生可以掌握VB语言的基本用法。
4.2 学习VB开发环境除了学习VB语言外,学生还需要熟悉VB开发环境。
这包括VB集成开发环境(IDE)的使用、项目管理和调试工具等。
vb设计教学管理系统课程设计一、课程目标知识目标:1. 掌握VB编程语言的基本语法和结构,能运用其设计简单的教学管理系统;2. 理解教学管理系统的功能需求,了解数据库的基本操作,能运用VB实现数据增、删、改、查功能;3. 学会使用VB中的事件处理机制,实现系统界面与用户交互。
技能目标:1. 培养学生运用VB编程语言解决实际问题的能力,提高编程技巧;2. 培养学生分析需求、设计系统、编写代码、调试程序的综合能力;3. 培养学生团队协作、沟通表达的能力,能就设计的教学管理系统进行有效的展示和讲解。
情感态度价值观目标:1. 激发学生对计算机编程的兴趣,培养自主学习、勇于探索的精神;2. 培养学生认真负责、严谨细致的工作态度,养成良好的编程习惯;3. 增强学生对教学管理系统在实际应用中的认识,提高信息素养和创新能力。
本课程针对高年级学生,结合VB编程语言和教学管理系统的实际需求,旨在培养学生的编程能力和解决实际问题的能力。
在教学过程中,注重理论与实践相结合,鼓励学生积极参与、主动思考,提高学生的动手实践能力和综合素质。
通过本课程的学习,使学生能够具备独立设计并实现教学管理系统的基础能力,为今后的学习和工作打下坚实基础。
二、教学内容1. VB编程基础:变量、数据类型、运算符、控制结构(顺序、分支、循环)、数组、函数过程;2. 界面设计:窗体、控件的使用(按钮、文本框、列表框等),布局与美化;3. 数据库操作:数据库概念,Access数据库的使用,SQL语句(增、删、改、查),数据绑定;4. 事件处理:鼠标事件、键盘事件、控件事件,事件过程编写;5. 教学管理系统功能模块设计:学生信息管理、课程信息管理、成绩管理、用户登录验证;6. 系统调试与优化:查找并修复程序中的错误,优化程序性能,提高用户体验。
教学内容按照课程目标,结合教材章节进行组织。
首先,让学生掌握VB编程基础,为后续的系统设计打下基础;其次,学习界面设计,使系统具有良好的用户交互界面;接着,引入数据库操作,让学生学会使用Access数据库进行数据管理;然后,学习事件处理,实现系统功能;在此基础上,根据教学管理系统的实际需求,设计功能模块;最后,进行系统调试与优化,确保系统的稳定性和性能。
VB程序设计课程设计报告完整版VB程序设计课程设计报告摘要:本课程设计报告旨在介绍一个完整的VB程序设计项目,该项目主要以某个实际问题为背景,通过使用VB编程语言进行设计和实现。
报告主要包括需求分析、设计方法、编程实现、测试和总结等内容。
一、引言VB(Visual Basic)是一种面向对象的事件驱动编程语言,它广泛用于Windows操作系统平台上的软件开发。
VB具有简单易学、强大的功能和丰富的开发工具,被广大开发者用于各种程序设计领域。
本课程设计旨在通过一个实际问题,让学生掌握VB程序设计的基本方法和技巧。
项目要求学生设计一个小型图书管理系统,实现对图书的添加、查询、借阅和归还等功能。
二、需求分析1. 功能需求:a) 添加图书:包括图书名称、作者、出版社等信息。
b) 查询图书:根据图书名称或作者查询图书信息。
c) 借阅图书:借阅图书并更新库存信息。
d) 归还图书:归还已借阅的图书并更新库存信息。
2. 数据需求:a) 图书信息:包括图书名称、作者、出版社、ISBN号码和库存数量等。
b) 借阅信息:包括图书名称、借阅人、借阅日期和归还日期等。
3. 用户界面需求:a) 主界面:显示各种操作选项。
b) 添加图书界面:用于输入图书信息。
c) 查询图书界面:用于输入查询条件并显示查询结果。
d) 借阅图书界面:显示已借阅图书信息并提供借阅操作。
e) 归还图书界面:显示已借阅图书信息并提供归还操作。
三、设计方法1. 模块划分:根据功能需求将程序划分为若干模块,包括主模块、添加图书模块、查询图书模块、借阅图书模块和归还图书模块等。
2. 数据结构设计:使用适当的数据结构存储图书和借阅信息。
3. 界面设计:根据用户界面需求,设计相应的窗体,并在窗体上放置控件,实现各种操作功能。
4. 事件处理:根据用户的操作,编写相应的事件处理程序,实现各种功能。
四、编程实现1. 程序架构:使用VB的Windows Forms应用程序模板创建项目,并按照模块划分设计程序结构。
随机点名系统。
综合网上各类小程序,自己修改定制了一款新的小程序。
学生名单.txt 放在同一个目录中。
使用截图如下Private Declare Sub SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long)'定义常量Const HWND_TOPMOST = -1 'On TopConst HWND_NOTOPMOST = -2 'No TopConst SWP_NOACTIV A TE = &H10 'Const SWP_SHOWWINDOW = &H40 ''Dim TopOn As IntegerDim ss, mm, nnDim num(1 To 300) As IntegerDim j, k As IntegerDim A(500) As String, r As IntegerDim filename As StringPrivate Sub Command1_Click()Dim b As StringDim t, i As Integerfilename = App.Path & "\" & "学生名单.txt" Open filename For Input As #1'产生记录总数以内的随机数xi = 1While Not EOF(1)Line Input #1, A(i)i = i + 1Wendc = iClose #1Start:Randomizet = Int(c * Rnd + 1)For j = 1 To cIf t = num(j) ThenGoTo StartEnd IfNextLabel1.Caption = A(t)k = k + 1num(k) = tIf k = c ThenMsgBox "所有人员均已点过!", vbSystemModal Command1.Enabled = FalseCommand3.Enabled = TrueEnd IfEnd SubPrivate Sub Command2_Click()Unload Form1End SubPrivate Sub Command3_Click()j = 0k = 0For i = 1 To 300num(i) = 0NextCommand3.Enabled = FalseCommand1.Enabled = TrueLabel1.Caption = "Name"End SubPrivate Sub Command4_Click()Timer1.Enabled = TrueCommand4.Enabled = FalseEnd SubPrivate Sub Data1_Validate(Action As Integer, Save As Integer) End SubPrivate Sub Form_load()Form1.Height = 500Form1.Width = 8550Command3.Enabled = FalseTimer1.Enabled = Falsemm = 45: ss = 0Timer1.Interval = 1000End SubPrivate Sub Timer1_Timer()Dim M As IntegerSetWindowPos Me.hwnd, HWND_TOPMOST, Me.Left / 15, _Me.Top / 15, Me.Width / 15, _Me.Height / 15, SWP_NOACTIV ATE Or SWP_SHOWWINDOW Line1:If ss < 10 Thens = "0" & ssElses = ssEnd IfIf mm < 10 Thenmmm = "0" & mmElsemmm = mmEnd Ift = mmm & ":" & sLabel2.Caption = tss = ss - 1If nn = 3 Thenss = 88End IfIf mm = 0 And ss = -1 And nn = 0 ThenMsgBox "休息时间已到,五分钟后继续", vbSystemModalnn = 1mm = 5: ss = 0GoTo Line1End IfIf mm = 0 And ss = -1 And nn = 1 ThenMsgBox "继续上课", vbSystemModalnn = 2mm = 45: ss = 0GoTo Line1End IfIf mm = 0 And ss = -1 And nn = 2 ThenMsgBox "放学咯!", vbSystemModalCommand1.Enabled = Falsenn = 3mm = 88: ss = 88End IfIf ss = -1 And mm > 0 Then mm = mm - 1: ss = 59If mm = 0 And hh > 0 Then hh = hh - 1: mm = 59 End Sub。
基于VBA的简答题阅卷系统的设计与实现摘要在各类中专、大专、本科院校,熟练使用Office软件已是学生计算机技能水平的基本要求。
因此对Office技能水平进行考核和评价变得尤为重要。
本文主要从系统的整体设计、程序实现、容错处理和安全性方面来研究基于VBA 的Excel简答题自动阅卷系统的设计与实现。
关键词阅卷;VBA;Excel;简答题传统考试要求教师出多套试卷、印刷试卷、安排考试、监考、收集试卷、试卷评分和试卷分析,从教师出题到考生考试,途经各个环节,过程复杂,已经越来越不适应现代教学的要求。
本文就Excel简答题自动阅卷进行系统设计。
该系统的最大特点是直接利用Office平台,用其内嵌的编程语言VBA,不用外部数据库,因为我们众所周知的Excel就是一种功能强大的数据存储工具,某种程度上可以充当数据库。
1 系统的整体设计本系统设计一个基于VBA的Excel简答题自动阅卷系统,即(Excel+VBA)的形式。
它是在一个已有的出题系统的基础上,设计一个阅卷系统。
当学生考试的时候,通过网络考试系统抽取自己的考试题号,根据题号到网站上去下载自己的考试题目。
学生下载到考试机上的是一个Excel工作簿,工作簿中包括试题工作表、标准答案工作表、判卷信息工作表。
自动阅卷的流程:从判卷信息表中读取试题类型号,根据试题类型号找到对应的判卷模块。
判卷模块的功能是:将试题表中结果所在区域和标准答案所在区域进行比较,统计错误数量,算出最后总分。
2 自动阅卷程序实现利用分句算法、分词算法、关键词抽取算法、相似度计算算法实现简答题的阅卷。
简答题的阅卷要找到学生答案中的关键词,根据关键词匹配,关键词的相似度,给出最终成绩。
2.1 简答题题型分析根据简答题答案特点和规律将简答题分成3类:简单答案型简答题,单句陈述型简答题,有序表述型简答题。
2.1.1简单答案型简答题所谓的简单答案型简答题就是指标准答案中有且只有一个关键字,这类题和单项填空题比较类似,所以针对这类题的阅卷,只需要判定关键字是否匹配即可。
vb课程设计题目答案一、教学目标本节课的教学目标是让学生掌握VB编程语言的基本语法和编程思想,能够运用VB编写简单的程序。
具体包括以下三个方面:1.知识目标:学生需要掌握VB的基本数据类型、变量、常量、运算符、控制结构等编程基础知识和技能。
2.技能目标:学生能够运用VB编写简单的控制台应用程序,熟练使用VB的集成开发环境(IDE),进行程序的调试和运行。
3.情感态度价值观目标:培养学生对编程语言的兴趣,增强学生的自主学习能力,培养学生的团队协作精神和创新思维。
二、教学内容本节课的教学内容主要包括以下几个部分:1.VB的基本数据类型和变量:整型、浮点型、布尔型等数据类型,以及变量的声明和使用。
2.常量和运算符:常量的定义和使用,算术运算符、关系运算符、逻辑运算符等。
3.控制结构:顺序结构、选择结构(if-else)、循环结构(for、while)等。
4.输入输出语句:Console.WriteLine、Console.ReadLine等。
5.函数:系统函数和用户自定义函数。
三、教学方法为了提高教学效果,本节课将采用以下教学方法:1.讲授法:教师通过讲解VB的基本语法和编程思想,让学生掌握编程的基础知识。
2.案例分析法:教师通过分析典型程序案例,引导学生理解和运用编程语言。
3.实验法:学生通过动手编写程序,巩固所学知识,提高编程能力。
4.小组讨论法:学生分组进行讨论,分享编程心得,培养团队协作精神。
四、教学资源为了支持教学内容的实施,我们将准备以下教学资源:1.教材:《VB编程语言》。
2.参考书:提供一些VB编程相关的参考书籍,供学生课后自主学习。
3.多媒体资料:制作精美的PPT,生动展示VB编程的相关知识点。
4.实验设备:为学生提供电脑、编程环境等实验设备,方便学生进行编程实践。
五、教学评估本节课的教学评估将采用多元化的评价方式,全面客观地评价学生的学习成果。
评估方式包括:1.平时表现:评价学生在课堂上的参与度、提问回答、小组讨论等,以了解学生的学习态度和积极性。
服务。
其次,对于“排除提问过的同学”这一需求可以这样满足:将点名表增加一个特殊的字段,把提问过的同学对应的字段做标记,用判断语句判断如果特殊字段已经做了标记则下次不在提问。
对于“从提问次数少的同学中选一个”需求可以这样满足:在点名表中增加一个次数字段,每次点名到时,将次数字段增加1次,点名时先中表中找到次数字段最少的同学提问,在使用随机函数随机选出一名同学。
最后,在程序中增加报表功能,报表中包括次次数、总分等满足需求,对于“次数不少于15次”的需求,可以将表增加序列次数字段,每次提问都将获得的分数存放到相应的次数中。
3、设计方案论证3.1系统结构3.2核心算法3.2.1随机数算法在本程序中多次用到了随机函数,在VF中的rand()函数只能返回(0,1)之间的随机数,并不能返回我们需要的“学号”,因此我们必须对rand()函数做适当的操作,使图1:随机查找算法流程图3.2.3中介表思想在需求中教师不只是教一个班级,还有很多个班级,很多课要教,对点名模块的设计绝对不能只对一个表操作,一定要有很多张表,且可以随意切换,用户选择哪张表,就点哪张表内的同学。
首先,将用户选择的表所对应的表名存进一张“中介表”中;点名时在从“中介表”中“拿”出对应的表名,再在点名模块中打开这张表进行操作,思想体现如下:biao=thisform.text1.valueuse mediatablereplace c with biao其中,biao中存放的是用户想点名的表的名字;mediatable为“中介表”;将biao中的内容存放在mediatable的C字段中,每次在使用点名模块点名的时候,都必须打开所有对应的表。
use mediatable3.3.2 Login表2:login表的结构字段名类型长度备注name password 字符字符1010用于存放用于的登录名用于存放登录的密码3.3.2mediatable表3:mediatable的结构字段名类型长度备注A B C D 字符字符字符字符10101010用于存放中介变量的临时字段用于存放中介变量的临时字段用于存放中介变量的临时字段用于存放中介变量的临时字段3.4表单设计3.4.1登录框图2:登录框的表单设计其中的控件信息如下表所示:表4:登录框模块中的控件控件名属性名属性值备注Label1 Label2 Text1 captionCaption用户名密码提示输入用户名提示输入密码Value 接收用户名图5:普通点名的表单设计单击“下一个”按钮,可以显示随机函数返回的随机数。
课堂互动随机点名系统的设计与实现
课堂互动随机点名系统的设计与实现
作者:徐碧赢[1];张松泓[1];
作者机构:[1]河南工业职业技术学院,河南南阳473000;;
来源:软件工程
ISSN:2096-1472
年:2017
卷:020
期:008
页码:P.47-49
页数:3
中图分类:TP311
正文语种:CHI
关键词:随机点名;课堂互动;Visual C#
摘要:学生上课考勤是教学过程中不可缺少的重要环节,各任课教师需要依靠点名来掌握学生的考勤情况,并通过课堂提问来了解学生对于课程的掌握情况。
新时代下学生个性强、上课回答问题积极性不高是当代大学生的普遍特点,为提高课堂教学的趣味性,以及学生课堂互动的积极性,设计了一款课堂互动随机点名系统。
该系统是基于C#设计开发的,界面简洁,使用方便,提高了课堂点名的效率并活跃了课堂氛围。
用VBA实现课堂语音点名作者:梁里宁来源:《电脑爱好者》2013年第05期具体实现方法思路:制作一个点名页面,安排三个操作按钮,分别是“点名”、“缺”、“到”,并分别给这三个按钮赋予相应的VBA程序代码,完成相应的控制或记录任务。
当开始点名时,老师点击“点名”按钮,让电脑按学生花名册信息自动语音点名,如果学生已到课,点击“到”按钮记录,如果学生缺课,点击“缺”记录。
首先要说明的是,Excel中的“文本到语音”功能不是默认安装的。
打开“工具”菜单,选择“语音”项子菜单中的“显示文本到语音工具栏”命令,Excel会自动进行安装。
安装好后,可以弹出“文本到语音”浮动工具栏。
以Excel 2003为例,具体实现步骤如下:1.在工作表Sheet2中输入学生的点名册信息(图1)。
2.适当设置工作表Sheet1中单元格的格式,并在其上添加三个命令按钮,标题分别为“开始”、“缺”和“到”(图2)。
3.为三个命令按钮“开始”、“缺”和“到”编写单击事件过程,输入具体的VBA代码:PrivateSubCommandButton1_Click()'开始With Sheet2Cells(12,1)=.UsedRange.Columns.Count+1Cells(13,1)=.UsedRange.Rows.Count-1'记录点名人数IfCells(13,1)>0 Then.Cells(1,Cells(12,1))=Date'记录点名日期.Cells(1,Cells(12,1)).ColumnWidth=10CommandButton2.Enabled=TrueCommandButton3.Enabled=TrueCommandButton3.ActivateCells(5,3)=.Cells(Cells(13,1)+1,1)'显示学号Cells(8,3)=.Cells(Cells(13,1)+1,2)'显示姓名Application.Speech.SpeakCells(8,3)'语音朗读姓名CommandButton3.ActivateEndIfEndWithEndSubPrivateSubCommandButton2_Click()'缺IfCommandButton2.EnabledThenWith Sheet2.Cells(Cells(13,1)+1,Cells(12,1))="缺" Cells(13,1)=Cells(13,1)-1'点名人数递减IfCells(13,1)=0 ThenMsgBox"点名完毕!"Cells(5,3)="点名请单击"Cells(8,3)="开始按钮"CommandButton1.ActivateCommandButton2.Enabled=FalseCommandButton3.Enabled=FalseElseCells(5,3)=.Cells(Cells(13,1)+1,1) '显示下一个的学生Cells(8,3)=.Cells(Cells(13,1)+1,2) Application.Speech.SpeakCells(8,3)'语音朗读姓名CommandButton3.ActivateEndIfEndWithEndIfEndSubPrivateSubCommandButton3_Click()'到IfCommandButton3.EnabledThenWith Sheet2.Cells(Cells(13,1)+1,Cells(12,1))="" Cells(13,1)=Cells(13,1)-1'点名人数递减IfCells(13,1)=0 ThenMsgBox"点名完毕!"Cells(5,3)="点名请单击"Cells(8,3)="开始按钮"CommandButton1.ActivateCommandButton2.Enabled=FalseCommandButton3.Enabled=FalseElseCells(5,3)=.Cells(Cells(13,1)+1,1)'显示下一个的学生Cells(8,3)=.Cells(Cells(13,1)+1,2)Application.Speech.SpeakCells(8,3)'语音朗读姓名EndIfEndWithEndIfEndSub点名开始前,“开始”命令按钮是可用的,而“缺”和“到”命令按钮都是不可用的。
vb课程设计系统一、课程目标知识目标:1. 让学生掌握VB(Visual Basic)编程语言的基本语法和结构,包括变量声明、数据类型、运算符、控制结构等。
2. 培养学生运用VB语言设计简单的程序,解决实际问题。
3. 使学生了解计算机编程的基本思想,理解程序设计的步骤和流程。
技能目标:1. 培养学生具备使用VB编程环境进行代码编写、调试和运行的能力。
2. 培养学生运用控制结构(如顺序、循环、分支)进行程序设计的能力。
3. 培养学生通过分析问题,运用所学知识进行程序设计,解决实际问题的能力。
情感态度价值观目标:1. 培养学生对计算机编程的兴趣,激发学习动力。
2. 培养学生具备良好的编程习惯,注重代码规范,提高代码质量。
3. 培养学生具备团队协作精神,善于沟通交流,共同解决问题。
课程性质:本课程为信息技术课程,旨在培养学生的编程思维和实际操作能力。
学生特点:学生为初中年级,具有一定的计算机操作基础,对编程有一定的好奇心和兴趣。
教学要求:结合学生特点和课程性质,采用案例教学、任务驱动、分组讨论等教学方法,注重理论与实践相结合,提高学生的实际操作能力。
在教学过程中,关注学生的个体差异,进行有针对性的指导。
通过本课程的学习,使学生能够掌握基本的VB编程技能,为后续学习打下坚实基础。
二、教学内容1. VB编程基础:- 变量与数据类型- 运算符与表达式- 程序结构(顺序结构、循环结构、分支结构)- 常用函数与过程2. 窗体与控件:- 窗体设计基础- 常用控件的使用(如按钮、文本框、标签等)- 事件处理3. 程序设计方法:- 需求分析- 算法设计- 代码编写与调试4. 实践项目:- 设计一个简单的计算器- 设计一个个人资料管理系统- 设计一个简易的抽奖程序教学大纲安排:第一周:VB编程基础(变量、数据类型、运算符)第二周:程序结构(顺序结构、循环结构)第三周:程序结构(分支结构)、常用函数与过程第四周:窗体与控件、事件处理第五周:实践项目一(设计计算器)第六周:实践项目二(设计个人资料管理系统)第七周:实践项目三(设计简易抽奖程序)第八周:复习与测试教学内容与教材关联性:本教学内容紧密结合教材,按照教材章节顺序进行教学,确保学生能够系统、全面地掌握VB编程知识。
点菜单程序vb课程设计一、课程目标知识目标:1. 让学生掌握VB编程语言中数组、循环和条件语句的基本概念和应用。
2. 使学生了解点菜单程序的逻辑结构和功能模块。
3. 帮助学生理解如何使用VB编写具有图形用户界面的程序。
技能目标:1. 培养学生运用VB编程语言解决实际问题的能力。
2. 提高学生分析需求、设计程序结构、编写代码、调试程序的综合技能。
3. 培养学生团队协作、沟通表达的能力。
情感态度价值观目标:1. 培养学生对计算机编程的兴趣和热情,激发主动学习的动力。
2. 培养学生严谨、细致、负责的工作态度,养成良好的编程习惯。
3. 培养学生面对问题敢于挑战、勇于创新的精神。
课程性质:本课程为实践性较强的计算机编程课程,以项目为导向,注重培养学生的实际操作能力和团队协作能力。
学生特点:学生具备一定的计算机操作基础,对VB编程有一定了解,但实际编程经验不足。
教学要求:结合学生特点,课程设计应注重理论与实践相结合,充分调动学生的积极性,引导学生主动参与,培养实际编程能力。
通过课程学习,使学生能够独立完成点菜单程序的编写和调试。
二、教学内容1. VB编程基础回顾:变量、数据类型、运算符、数组。
2. 控制结构:顺序结构、循环结构(For、While)、条件结构(If、Select Case)。
3. 界面设计:窗体、控件(按钮、文本框、列表框等)、菜单。
4. 事件处理:鼠标事件、键盘事件、控件事件。
5. 点菜单程序设计:- 需求分析:了解点菜单程序的功能和用户需求。
- 程序结构设计:模块划分、功能描述、界面布局。
- 编程实现:编写代码实现各模块功能,如添加菜品、删除菜品、计算总价等。
- 调试与优化:测试程序,查找并修复错误,优化用户体验。
6. 项目实践:分组进行点菜单程序的开发,培养学生的团队协作能力和实际编程能力。
教学内容安排和进度:1.VB编程基础回顾(1课时)2.控制结构(2课时)3.界面设计(2课时)4.事件处理(2课时)5.点菜单程序设计(5课时)- 需求分析(1课时)- 程序结构设计(2课时)- 编程实现(2课时)6.调试与优化(2课时)7.项目实践(4课时)教材章节关联:《VB程序设计》第3章 变量与数据类型第4章 控制结构第5章 界面设计第6章 事件处理第7章 数组第8章 文件操作(可选)三、教学方法1. 讲授法:在课程初期,针对VB编程基础知识和新概念,采用讲授法进行教学。
vb课程设计带答案一、课程目标知识目标:1. 理解VB编程语言的基本概念,掌握数据类型、变量、常量的定义与使用;2. 学会使用VB的运算符和表达式进行数据处理;3. 掌握顺序结构、选择结构、循环结构的编程方法;4. 了解VB中常用控件的属性、事件和方法,并能运用到实际程序设计中。
技能目标:1. 能够独立编写简单的VB程序,实现基本的输入、处理、输出功能;2. 能够运用所学知识解决实际问题,具备初步的程序调试能力;3. 能够通过VB编程,培养逻辑思维能力和问题解决能力。
情感态度价值观目标:1. 培养学生对计算机编程的兴趣,激发学习积极性;2. 培养学生团队合作意识,学会在编程过程中互相帮助、共同进步;3. 培养学生严谨、细致的学习态度,养成良好的编程习惯。
课程性质:本课程为信息技术课程,旨在让学生掌握VB编程基础知识,培养编程技能,提高解决问题的能力。
学生特点:学生处于初中年级,具备一定的计算机操作能力,对编程有一定的好奇心,但注意力容易分散,需要通过实践操作和趣味性教学来保持学习兴趣。
教学要求:结合学生特点,注重理论与实践相结合,采用案例教学,让学生在实际操作中掌握VB编程知识,培养编程技能。
在教学过程中,关注学生的学习进度,及时调整教学策略,确保课程目标的实现。
通过本课程的学习,使学生能够具备基本的编程能力,为后续学习打下坚实基础。
二、教学内容1. VB编程环境及基本操作- 熟悉VB集成开发环境- 学会创建、保存、打开和运行VB程序2. VB基本语法- 数据类型、变量和常量的定义与使用- 运算符和表达式的使用- 常用函数的调用3. 控制结构- 顺序结构编程- 选择结构编程(If...Then语句、Select Case语句)- 循环结构编程(For...Next语句、While...Wend语句)4. VB常用控件- 文本框、标签、按钮等基本控件的使用- 单选框、复选框、列表框等高级控件的使用5. 简单的窗体设计- 窗体属性的设置- 控件布局与排列- 事件处理程序编写6. 程序调试与优化- 学会使用调试工具进行程序调试- 掌握程序优化技巧,提高程序性能教学内容依据课本章节进行安排,注重理论与实践相结合。
V F课程设计点名系统-V F课程设计-V i s u a l F o x P r o课程设计-V F P课程设计3.2核心算法3.2.1随机数算法在本程序中多次用到了随机函数,在VF中的rand()函数只能返回(0,1)之间的随机数,并不能返回我们需要的“学号”,因此我们必须对rand()函数做适当的操作,使其返回我们需要的“学号”。
分析,假如一个班级有40名同学,那么随机数算法给我们返回的数的范围一定是在0~40之间。
假如一个班级有100名同学,那么随机数算法给我们返回的数的范围一定是在0~100之间。
因此根据数学算法,将rand()进行变形。
X=int(10000*rand()%(max-mix)+mix) 其中,max为序列的最大值,mix为序列的最小值,X为返回的随机数。
如,一个班级有40人,则max的值就为40,mix的值就为1。
则X返回的随机数一定在0~40之间。
图1:随机查找算法流程图3.2.3中介表思想在需求中教师不只是教一个班级,还有很多个班级,很多课要教,对点名模块的设计绝对不能只对一个表操作,一定要有很多张表,且可以随意切换,用户选择哪张表,就点哪张表内的同学。
首先,将用户选择的表所对应的表名存进一张“中介表”中;点名时在从“中介表”中“拿”出对应的表名,再在点名模块中打开这张表进行操作,思想体现如下:biao=thisform.text1.valueuse mediatablereplace c with biao图2:登录框的表单设计其中的控件信息如下表所示:表4:登录框模块中的控件控件名属性名属性值备注Label1 Label2 Text1captionCaption用户名密码提示输入用户名提示输入密码Value接收用户名续表4:Test2 Command1 Command2 Command2valueCaptionCaption登录清除接收用户密码登录按钮清除按钮Caption退出退出按钮以下是登录框各个按钮的click事件:表5:登录框代码表登录清除退出name=alltrim(thisform.text1.value) password=alltrim(thisform.text2.value) use login &&在login表里查找locate for ==nameand login.password==password if found() thisform.text1.value=""thisform.text2.value=""Thisform.releasethisform.releasedo form 主页面&&打开主页面elsemessagebox("用户名或密码不正确","提示")thisform.text2.value=""thisform.text1.value=""thisform.text1.setfocusEndif3.4.2普通点名图5:普通点名的表单设计单击“下一个”按钮,可以显示随机函数返回的随机数。
vb 课程设计点菜一、教学目标本节课的学习目标包括以下三个方面:1.知识目标:学生需要掌握VB编程语言的基本语法和控制结构,了解面向对象编程的基本概念。
2.技能目标:学生能够运用VB编程语言实现简单的点菜系统,培养学生的编程能力和解决问题的能力。
3.情感态度价值观目标:通过本节课的学习,学生能够培养对编程的兴趣,增强自信心,培养团队协作和自主学习能力。
二、教学内容本节课的教学内容主要包括以下几个部分:1.VB编程语言的基本语法和控制结构,如变量、数据类型、条件语句、循环语句等。
2.面向对象编程的基本概念,如类、对象、属性、方法等。
3.点菜系统的需求分析、设计、实现和测试。
三、教学方法为了达到本节课的教学目标,我们将采用以下几种教学方法:1.讲授法:讲解VB编程语言的基本语法和控制结构,面向对象编程的基本概念。
2.案例分析法:通过分析实际案例,让学生了解点菜系统的实现过程,培养学生的编程能力和解决问题的能力。
3.实验法:让学生动手实践,编写VB程序实现点菜系统,培养学生的实际操作能力。
四、教学资源为了支持本节课的教学内容和教学方法的实施,我们将准备以下教学资源:1.教材:《VB编程基础》2.参考书:《VB编程实例解析》3.多媒体资料:教学PPT、视频教程4.实验设备:计算机、网络环境以上是本节课的教学设计,希望能够帮助学生更好地学习和掌握VB编程语言,培养学生的编程能力和解决问题的能力。
五、教学评估本节课的教学评估将采用以下几种方式:1.平时表现:通过观察学生在课堂上的参与程度、提问回答等情况,评估学生的学习态度和积极性。
2.作业:布置相关的编程作业,评估学生的编程能力和对知识的掌握程度。
3.考试:安排一次考试,测试学生对VB编程语言和点菜系统实现的掌握程度。
评估方式将客观、公正地全面反映学生的学习成果,帮助学生了解自己的学习情况,提高学生的学习动力和效果。
六、教学安排本节课的教学安排如下:1.教学进度:按照教学大纲和教材的章节顺序进行教学,确保在有限的时间内完成教学任务。
VB课堂点名回答问题系统的设计与实现目录中文摘要 (Ⅰ)英文摘要 (Ⅱ)第一章标题 (1)第一节标题 (1)一、 (2)二、 (3)第二节标题·······················一、··························二、··························第二章标题·························第一节标题·······················一、··························二、··························第二节标题·······················一、··························二、··························参考文献··························附录(可选)························致谢····························第一章前言第一节研究背景及目的意义近些年来,我国大学生的整体素质不断下降,一方面是由于政策上的放松,另外一个不可忽视的原因便是大学课堂越来越低的到课率。
然而传统的课堂点名提问的方法不仅浪费时间,更是难以避免学生代答等问题,我们可以利用电脑通过课堂点名提问系统做到规管理、科学统计、高效工作,从而做到完善课堂状况,进而提高学生的素质水平。
这时,课堂点名回答问题系统的存在便显得尤为重要了。
本系统的主要设计目的是提高大学课堂中的学生到课率及课堂教学质量,主要包括了班级管理、课堂签到、点名答题及作业布置等。
其主要功能包括:1、教师相关信息,包括个人基本信息、所在学院、教授课程、教课班级等的录入、修改、查询。
2、班级管理,包括班级信息录入、修改、查询3、学生管理,包括学生信息录入、修改、查询4、课堂签到5、点名提问6、作业布置(1)。
第二节开发工具介绍本系统采用Windows 7作为操作系统,用Microsoft office access2003来进行数据库的设计,并使用visual basic6.0进行数据处理,以visual basic6.0为平台进行前端程序的设计。
○1Microsoft office access2003是在计算机上应用比较广泛的数据库软件,主要用于开发小型数据库系统,并且其拥有简单易用、功能完备等优点,所以,基于本系统的设计背景及目的,我选用Microsoft office access2003来创建数据库,利用它来实现数据的添加、修改、删除并与vb进行实现数据的同步。
○2 Microsoft Visual Basic 6.0是一种结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。
它源自于BASIC编程语言。
VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建ActiveX控件。
程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
(1)正文内容字体为四号仿宋。
整篇文档首行右缩进2字符,段前、断后0行,行距为1.5倍行距。
第二章本论第一节系统总体结构设计首先,要对本系统进行结构设计分析,根据对本系统的设计要求及功能运用,得到总体架构。
一、系统结构分析本系统的主要开发目的是为了实现课堂基本教学操作的自动化、系统化,提高课堂教学的效率和质量,并引导教师更加高效、统一地完成课堂管理工作。
本系统的主要功能有:○1教师用户的基本信息录入、修改及注销。
○2教师个人课表的查询○3教课班级的查询及班级信息的录入、修改。
○4学生信息的录入、修改及注销。
○5学生课堂状态的查询。
○6课堂签到,包括班级选择及学生签到○7点名提问,包括新增题目、题目选择、随机点名及查看答案。
○8作业布置,包括从题库中选择题目、自行编辑题目及作业上交时间的提示。
二、模块的设计图2-1 VB课堂点名回答问题系统模块设计第二节数据库设计数据库设计是本系统在开发中的一大重点和难点,在此之前,我们需要了解用户对软件的需求,用户群的操作习惯,基本的操作规,然后再进行数据库的规划设计,由于数据库中表与表之间是相互联系相互影响的,所以在建表之前一定要慎重,不要等到发现不适合之后再对表进行修改。
一、数据库设计需求一个完整统一的数据库对系统运行的效率和系统多功能的实现起着非常大的作用,因此,在设计数据库的时候,我们需要做好以下几点:○1能满足用户的使用需求○2数据要统一、完整○3用户能对相关数据进行相应的操作处理○4数据要能及时、准确地实现前端程序与后台数据库间的同步○5要避免数据冗余○6对数据库的维护要简单高效二、创建数据注册信息表,如表2-2所示表2-1 注册信息表第三节界面设计在完成了前面的基本分析和数据库建立工作以后,系统的初期开发基本建成,接下来便要进行人机交互界面的开发设计,为使用户有更好的交互体验,系统的用户界面必须要友好、简洁、功能完整。
所以,在设计过程中我们必须做好功能模块的规划以及整体界面的美化工作。
一、课堂点名回答问题系统的具体实现Microsoft Visual Basic 6.0 是一种可视化的程序设计语言,以下我将以图文的形式分别对各大功能界面的具体实现进行详细说明。
二、登陆界面的设计根据VB代码实现,创建系统登录界面如图2-3所示图2-2 登录界面在登陆界面中,出于界面的美观考虑,将label控件及text控件的背景样式设置为透明,并将边框样式设置为None,将Adodc设置为不可见,本界面的控件有:Label1:点击进入注册界面Label2:点击进行登录操作Label3:点击关闭登录界面Text1:点击进行用户名(教师编号)的输入Text2:点击进行密码输入Adodc1:与access数据库进行连接登陆界面的控件及属性设置如表2-2所示表2-2 登陆界面控件属性添加代码:Private Sub Form_Load()Text1.Text = "教师编号"Text2.Text = "密码"End SubPrivate Sub Form1_Resize()If isiconic(Me.hWnd) <> 0 And minflag = False Thenminflag = Trueiccardmain.Visible = FalseCall icon_add(Me.hWnd, Me.Caption, iccardmain.Icon, 0) End IfEnd SubPrivate Sub Form_Unload(Cancel As Integer)EndEnd SubPrivate Sub Label1_Click()Form2.ShowUnload MeEnd SubPrivate Sub Label2_Click()If Text1.Text = "" Or Text2.Text = "" ThenMsgBox "教师编号或密码不可为空!", , "提示"Exit SubElseAdodc1.RecordSource = "select * from 注册信息表 where 教师编号=" & Trim(Text1.Text) & ""Adodc1.RefreshIf Adodc1.Recordset.RecordCount > 0 Then '查找存在该用户If Adodc1.Recordset.Fields("密码") <> Text2.Text Then '核对用户密码MsgBox "密码错误,请重新输入!", vbOKOnly + vbExclamation, "提示:"Text2.Text = ""Else'密码正确Form3.ShowMe.HideEnd IfElseMsgBox "教师编号错误或不存在!", , "提示" End IfEnd IfEnd SubPrivate Sub Label3_Click()Form1.Visible = FalseEnd SubPrivate Sub Label4_Click()Form4.ShowUnload MeEnd SubPrivate Sub Text1_GotFocus()If Text1.Text = "教师编号" Then Text1.Text = ""End SubPrivate Sub Text1_LostFocus()If Text1.Text = "" Then Text1.Text = "教师编号"End SubPrivate Sub Text2_GotFocus()If Text2.Text = "密码" Then Text2.Text = "" Text2.PasswordChar = "*"End SubPrivate Sub Text2_LostFocus()If Text2.Text = "" Then Text2.Text = "密码" Text2.PasswordChar = ""End Sub三、注册界面的设计创建系统注册界面如图2-3所示图2-3 注册界面在注册界面中,同样将label控件及text控件的背景样式设置为透明,并将边框样式设置为None,将Adodc设置为不可见,本界面的控件有:Label1:点击进行注册操作Label2:点击关闭注册界面Text1:点击进行用户名(教师编号)的输入Text2:点击进行密码输入Text3:点击进行密码确认Text4:点击进行教师的输入Text5:点击进行教学科目的输入Text6:点击进行学院名称的输入Adodc1:与access数据库进行连接注册界面的控件及属性设置如表2-3所示表2-3 登陆界面控件属性添加代码:Private Sub Form_Load()Text1.Text = "请输入教师编号"Text2.Text = "请输入密码"Text3.Text = "请确认密码"Text4.Text = "请输入教师"Text5.Text = "请输入教学科目"Text6.Text = "请输入学院名称"End SubPrivate Sub Label1_Click()If Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" Or Text6.Text = "" Then MsgBox "信息填写不完整,请检查!", , "提示"ElseIf Text3.Text <> Text2.Text ThenMsgBox "您两次输入的密码不一致,请重新输入", , "提示"Text3.Text = ""Exit SubEnd IfAdodc1.RecordSource = "select * from 注册信息表 where 教师编号=" & Trim(Text1.Text) & ""Adodc1.RefreshIf Adodc1.Recordset.RecordCount > 0 Then '如果账号已经存在MsgBox "账号已经存在", , "提示"Text1.Text = "": Text2.Text = "": Text3.Text = "": Text4.Text = "": Text5.Text = "": Text6.Text = ""Exit SubElseAdodc1.Recordset.AddNewAdodc1.Recordset.Fields("教师编号") = Trim(Text1.Text)Adodc1.Recordset.Fields("密码") = Trim(Text2.Text)Adodc1.Recordset.Fields("教师") = Trim(Text4.Text) Adodc1.Recordset.Fields("教学科目") = Trim(Text5.Text) Adodc1.Recordset.Fields("学院名称") = Trim(Text6.Text) Adodc1.Recordset.UpdateMsgBox "恭喜您,您的信息已注册成功", , "提示:"Form1.ShowUnload MeEnd IfEnd IfEnd SubPrivate Sub Label2_Click()Form14.ShowUnload MeEnd SubPrivate Sub Text1_GotFocus()If Text1.Text = "请输入教师编号" Then Text1.Text = "" End SubPrivate Sub Text1_LostFocus()If Text1.Text = "" Then Text1.Text = "请输入教师编号"End SubPrivate Sub Text2_GotFocus()If Text2.Text = "请输入密码" Then Text2.Text = "" Text2.PasswordChar = "*"End SubPrivate Sub Text2_LostFocus()If Text2.Text = "" Then Text2.Text = "请输入密码" End SubPrivate Sub Text3_GotFocus()If Text3.Text = "请确认密码" Then Text3.Text = "" Text3.PasswordChar = "*"End SubPrivate Sub Text3_LostFocus()If Text3.Text = "" Then Text3.Text = "请确认密码" End SubPrivate Sub Text4_GotFocus()If Text4.Text = "请输入教师" Then Text4.Text = "" End SubPrivate Sub Text4_LostFocus()If Text4.Text = "" Then Text4.Text = "请输入教师" End SubPrivate Sub Text5_GotFocus()If Text5.Text = "请输入教学科目" Then Text5.Text = "" End SubPrivate Sub Text5_LostFocus()If Text5.Text = "" Then Text5.Text = "请输入教学科目" End SubPrivate Sub Text6_GotFocus()If Text6.Text = "请输入学院名称" Then Text6.Text = "" End SubPrivate Sub Text6_LostFocus()If Text6.Text = "" Then Text6.Text = "请输入学院名称" End Sub四、个人中心界面的设计创建个人中心界面如图2-4所示在个人中心界面中,同样将label控件的背景样式设置为透明,边框样式设置为None,将Adodc设置为不可见,本界面的控件有:教师编号(0)Label:显示登录用户的教师编号教师 Label:显示登录用户的教师年龄 Label:显示登录用户的年龄学院 Label:显示登录用户的学院信息课程 Label:显示登录用户的课程信息职称 Label:显示登录用户的职称教龄 Label:显示登录用户的教龄个人中心(1)Label:显示个人中心界面教师课表(2)Label:显示教师课表界面班级管理(3)Label:显示班级管理界面学员录入(4)Label:显示学员录入界面学生查询(5)Label:显示学生查询界面课堂签到(6)Label:显示课堂签到界面点名提问(7)Label:显示点名提问界面作业布置(8)Label:显示作业布置界面性别男optionbutton:判断当前用户是否为男性性别女optionbutton:判断当前用户性别是否为女性照片上传label:点击进行照片上传密码修改label:点击进行密码修改密码修改label:点击进行个人信息修改关闭label:点击关闭当前界面Adodc1:与access数据库进行连接注册界面的控件及属性设置如表2-3所示表2-3 个人中心界面控件属性添加代码:Private Sub Form_Load()SQL = "select 性别 from 教师信息表"If SQL = "男" Then性别男.Value = TrueElse性别女 = TrueEnd IfEnd SubPrivate Sub 班级管理_Click(Index As Integer) Form6.ShowUnload MeEnd SubPrivate Sub 点名提问_Click(Index As Integer) Form19.ShowUnload MeEnd SubPrivate Sub 个人中心_Click(Index As Integer) Form3.ShowUnload MeEnd SubPrivate Sub 关闭_Click()Form14.ShowUnload MeEnd SubPrivate Sub 教师课表_Click(Index As Integer) form5.ShowUnload MeEnd SubPrivate Sub 课堂签到_Click(Index As Integer) Form16.ShowUnload MeEnd SubPrivate Sub 密码修改_Click()Form13.ShowUnload MeEnd SubPrivate Sub 修改个人信息_Click()Form4.ShowUnload MeEnd SubPrivate Sub 学生查询_Click(Index As Integer)Form11.ShowUnload MeEnd SubPrivate Sub 学员录入_Click(Index As Integer) Form9.ShowUnload MeEnd SubPrivate Sub 作业布置_Click(Index As Integer) Form21.ShowUnload MeEnd Sub4.3 添加代码4.4 登陆界面的设计4.5………..4.n参考文献[1] 家广,长青.计算机图形学[M].北京:清华大学,1995.26~28[2] 陶仁骥. 有限自动机的可逆性[M].北京:科学,1986.[3]Skolink M I.Radar Handbook[M]. New York: McGraw-Hill, 1990[4]旭东,宗光华,毕树生等.生物工程微操作机器人视觉系统的研究[J].北京航空航天大学学报,2002,28(3):249~252[5]王明亮.关于中国学术期刊标准化数据系统工程的进展[EB/OL]. http://.cajcd.edu./pub/wm1.txt/980810-2.html,1998-08-16/1998-10-04附录致谢。