【VB开源代码栏目提醒】：以下是网学会员为您推荐的VB开源代码-用VB编写自动评分程序 - 技术总结，希望本篇文章对您学习有所帮助。
文孙春美我们学校经常举行各种各样的竞赛活动比如优质大课竞赛、演讲比赛、歌唱比赛等这样就涉及到评分的
问题为了节省人力物力。
能更快速的亮出评委打出的分数并能快速的算出最后得分于是我用编写了一个自动评分程序。
新建一个工程在窗体上放置如图个标签控件、个文本框控件和个按钮控件。
其中的个标签控件是用来显示最后得分、最高分和最低分设置其属性为空另外个标签的属性如图所示。
其中的个文本框控件是用来输入评委人数和扣除的分数另外个文本框为控件数组分别为设置其属性为。
两个按钮控件其叩属性分别为评分、退出然后按照上图设置好控件的字体、大小和位置等。
编写“评分”按钮的事件过程程序
代码如下—’为评委人数“’计算最高分一【陆口【蹦下印【’显示出最高分蹦—’计算最低分Ⅱ蹦蹦叩显示最低分…’’判断是否扣分”请在时间扣分框中输人数字“””蹦记下扣除的分数’计算总分—Ⅱ—打—一一”槲”’显示出总分编写“”文本框的按键事件过程程序
代码如一鼢骥嬲与技、吨—————一一 万方数据现在的硬盘容量真是越来越大了里面存储的文件也越来越多当我们想找某个文件时总是要用到自带的文件搜索器。
那么大家有没有想过要自己制作一个文件搜索器呢其实很简单的用就可以轻松实现。
有人可能要说了这很简单啊不就是用控件和控件么。
的确使用这两个控件也可以实现类似的功能但是程序的效率实在是不敢恭维。
今天我要体现的是中面向对象编程的宗旨使用最新对象。
首先新建一个标准
程序在上放上、、、控件各一窗体布局各位可以随意。
程序
代码如下声明程序所需的全局变量特别是。
由开始搜索驱动器眦获得驱动器
列表。
如果驱动器类型是本地硬盘。
搜索下级文件夹。
—小’搜索磁盘根目录中的文件。
”搜索完成”订’文奚波零祭努弛孓零雾芬磕薄零努墟薄努迎薄乏摹努境摹零祭祭雾雾嗡避孓零祭秘祭零零祭祭雾零零零零祭祭牙迎≠边薄一’输入评委人数并按回车键结束Ⅱ判断评委人数输入框中输入的是不是数字”请输入数字一一”…’为评委人数“规定评委人数不低于但不超过”评委人数至少为至多为”…’竺竺慧淼篡≯叶———一Ⅱ一’使得个评委打分框可见使得个评委框中剩下的评委框不可见编写“退出”按钮的事件过程程序
代码如下—’退出程序四自己制作。
一一。
个简单 万方数据用
VB编写自动评分程序作者孙春美作者单位刊名电脑知识与技术经验技巧英文刊名COMPUTER KNOWLEDGE AND TECHNOLOGY年卷期200332 本文链接http://d.g.wanfangdata.com.cn/Periodical_dnzsyjs200332012.aspx
相关文章
2013-9-15
