vb教学设计【优秀7篇】

VB课程是计算机科学与技术本科专业的专业骨干课。本课程主要通过VB论述了面向对象程序设计和组建编程的机理,以下是美丽的小编给家人们收集的vb教学设计【优秀7篇】,欢迎借鉴。

职高VB教学心得 篇1

职高VB教学心得

摘 要:在VB教学中,针对职高生的特点,结合教学实践,总结了一些有效的方法。

关键词:VB教学;兴趣;方法

Visual Basic程序设计,简称VB,具有可视化、面向对象、采用事件驱动编程机制的特点。简单易学、功能强大,是一门实用性很强的课程,也是我校职高计算机专业的一门必修课,教学内容分为设计程序界面和编写程序代码两部分。对学生来说,程序设计的思维方式、概念都是全新的,普遍觉得枯燥、难懂、不感兴趣,接受起来比较困难。针对这一情况,到底采用什么样的教学方法,才能让学生掌握呢?我在几轮的教学中有下面体会:

一、激发学生兴趣

教学中,常遇到学生不入门、不细心、常出错等问题。比如,常把对象名text写成txet;事件与属性分不清;枯燥的代码更是觉得难以理解,不愿意研究,归根结底还是兴趣不高造成的。在教学中,应注重课前导入,根据教学目的及要求,将学生的熟悉的、感兴趣的及热点问题进行融合,制作案例,激发学生兴趣。如,我在讲文本框时(Text Box),将Windows、QQ等界截图,制作案例。课前,播放给学生,让学生有自己动手完成的冲动,然后通过对案例的阅读、分析、运行和总结,掌握各知识点。

二、突破教学难点

教学难点是指教学中学生难以理解的教学内容,如不能及时地突破一个个难点,日子久了,难点堆积就会吓倒一大批学生。因此,快速有效地突破难点,是提高教学质量的重要保证,是提升学生学习信心的关键因素,也是教师必备的基本功之一。以下是我在教学中用到的一些方法。

1.类比法

类比法的关键就是将抽象的问题迁移到日常中熟悉的事物上,利用两者之间的相似性促使学生理解。面向对象程序设计的基本概念是教材中的一个难点,为了达到预期的教学效果,用不同的事物作类比。如,介绍对象的属性概念时,可以用一个人的性别、身高、体重等属性作类比;介绍对象的方法时,可以用一个人会吃饭、会睡觉、会唱歌等作类比。

学习变量时,因为这个概念太抽象了,让逻辑思维能力差的学生摸不着边际,不知到底是何物,加上早已习惯了“=”的用法,对于变量的值随时变化更是难以理解,这就成了教学中的一大难点。

2.死记法

当然,只有理解了,才能让学习转变为有意义的学习。但在实际教学中,由于学生数学基础差,抽象思维能力跟不上,尽管你使用了各种方法还是不能理解,这种情况下,只能死记了。如:Int函数,它的功能是取不大于本身的最大整数。但对负数取整时总有学生出错,没办法只好记住:“凡是有尾的,正的直接截尾;负的先减1,再截尾。”自此以后,再没有学生出错了。再如,产生区间内随机整数:Int(Rnd*(b-a+1))+a.

3.总结归纳法

在教学中发现,尽管学生很认真地学习,但还是常常出错或容易混淆。为此,我尝试用总结归纳法将一些易错、易混淆的知识点归纳、总结给学生,收到了良好的效果,学生不仅能够牢固地掌握知识的要点,而且还增强了学习的。信心。如,函数中的Int函数和Fix函数;Spc函数和Space函数;Space函数和Tab函数等。

三、改变实践教学方法

由于要参加对口升学考试,在实际教学中注重理论教学及习题的练习,而忽视实践教学和学生动手能力的培养。因此,一要适当增加实践课,尽量让学生多动手,多思考,通过程序的运行检验自己的想法;二要注重实践课的启发、引导,学生基础较差,虽然讲例题时听明白了,到真正自己动手时,绝大部分学生无从下手,需要教师“设计任务→启发→引导→尝试、探索、观察”,成为自主的学习者,把“教法”与“学法”统一起来,让学生感受学习的乐趣。在此过程中,教师要多鼓励,及时发现、解决问题并帮助学生总结。

四、培养正确的编程思想

在VB教学过程中,学生往往不知如何将问题自顶向下,逐层分解细化,将大问题细分为小问题,直到满足每一个要求,再用基本语句实现。在授课时,要注重培养正确的编程思想,这样学生才会有全局观念,思路清晰、有条不紊,有利于问题的解决。

总之,在教学中坚持理论与实践相结合的方式,注重学生应用能力的培养,勤思考、多尝试,定会完成预期教学目标,培养出符合社会需求的实用性人才。

vb教案 篇2

VB教学案例设计的总体思路及其实例解析

本文针对案例教学法在VB课程中的应用问题,提出了选取和设计高质量VB教学案例的。总体思路,并通过实例进行了说明。

作 者:李志辉 LI Zhi-hui  作者单位:湖北经济学院,计算机学院,湖北,武汉,430205 刊 名:计算机教育 英文刊名:COMPUTER EDUCATION 年,卷(期): “”(22) 分类号:G642 关键词:案例设计   总体思路   VB程序设计   案例教学法

用MSGBOX函数设计版权信息。VB 篇3

在前两周中我们进行的VB课程设计中,我获得了一些心得体会

这是我第一次系统与完整的接触软件设计。我们组的题目是关于“俄罗斯方块游戏”的设计。我在组内主要负责(1)游戏界面的设计(2)俄罗斯方块的造型(3)游戏级别的自由选择(4)游戏速度的自由选择(5)游戏的背景音乐。在这次课程设计中,我的能力得到了锻炼,自己也有许多体会。这次的课程设计是自己第一次全面接触软件的制作过程。以前仅仅是对软件的开发有一个大体的印象,通过这次的课程设计,我对软件的开发有了切身的体会。软件并不像我原来所想的'那样十分神秘,而是有着一个相对固定的模式和流程。我们只要按照这个模式和流程,就能够比较规范的完成一个软件的制作。软件的制作是一个系统的工程,需要我们掌握多方面的知识。在这次课程设计中,我觉得自己的知识面依然有所欠缺。因此我需要在以后的学习中加以注意,要不断的提高自己的知识面与知识层次。

我在这次课程设计中主要负责(1)游戏界面的设计(2)俄罗斯方块的造型(3)游戏级别的自由选择(4)游戏速度的自由选择(5)游戏的背景音乐。在这次课程设计之前,我对VB的编程不是特别的熟悉,这次的课程设计,我是一边学习,一边总结,一边进步。在编程的过程中,我体会到其实各种计算机语言是有相通之处的。在以前的 学习中,我只接触过C语言,这次在VB课程设计中,我发现C语言中的许多知识可以应用到VB中,两者具有相通的数据结构。所以我认为现在对计算机语言的学习,不要贪多,而应耐心的学好一门主要的计算机语言,在这个基础上,去学习其他的语言,这样会使学习效率大大提高。

在编程的过程中,我体会到编程是十分辛苦的。在课程设计这一段时间里,我每天的生活基本是在不断的调试程序和修改代码中完成的。有时,这种生活令人感到乏味和疲倦,但是在这种近似枯燥的生活中,我的编程水平有了一定程度的提高,这是课程设计中我最大的收获。以前学习计算机语言,总是静不下心来,不能认真的看书。这次课程设计,为了顺利的完成编程工作,我认真的学习了VB语言,并有了一定的心得体会。所以在以后的学习中,自己全身心的投入,这样学习才会有效率,才会有效果。

这次的课程设计是按小组进行的,我们的小组由两名同学组成。软件的设计本来就是一个团体的智慧结晶。这次课程设计也给了我们一次体验团体合作的机会。在课程设计中,我深深的体会到集体的智慧于力量是个人所无法比拟的。在课程设计中,我们的小组成员互相帮助,有问题两个人一起讨论解决,大大节省了时间。互相都提出了很好的建议,使我们的课程设计得以较好的完成。

课程设计已经结束了,但在课程设计的这些体会要应用到今后的日常学习中去。在新的学期,我觉得自己要在以下几个方面加以注意:

首先,在学习专业课的时候要注意理论联系实际。注意将课本上的知识应用到日常的操作中,真正做到学以致用。只有这样,才能做到目的明确,才能有足够的学习动力。

其次,在学习过程中要经常与同学进行交流,讨论所遇到的问题,并一起解决。在讨论中解决问题,会节约很多时间,并且在交流的过程中,我们也可以学到更多的东西。

课程设计已经已经完美解暑,这次课程设计给我打来了很多新的体会,在以后的学习中要不断总结,不断改进,使自己的成绩有新的提高。只有不断努力,才会使自己变得更加优秀。

VB―列表框控件 篇4

VB程序设计心得

在课程设计过程中,虽然我对程序设计不是很熟悉,但是通过老师详细的讲解,我按照步骤去做,遇到问题的时候先自己想办法解决,解决不了的就去问同学,问老师,通过这种学习,收获很大,学会了自己解决棘手问题,知道了团结的力量。

刚开始做程序的时候,就是完全按照老师的要求,老师的步骤去做的,结果却发现,怎么运行不了?明明是按照老师的步骤去做的,明明是按照老师的要求去做的,但是就是会遇到一些问题使程序运行不了。开始也没有管那么多,仍然是按照课本上的去做。

第一次,在上机课的时候,我根据老师讲的,在机房里做了一次,但没有做完。于是把东西存在了自己的MP3里面,以便以后上机的时候再来做。但真的没有想到,我的MP3,在一次上电子阅览室的时候,忘了拔了。于是乎,我辛辛苦苦做了一大节课的程序就这样没了。心里真的。很不舒服,但是,不舒服归不舒服,这个程序,还是得继续做下去,这么以点点小小的失误不算什么,然后跑到学校机房,继续我的VB程序设计。但由于时间问题,做的还是有点粗糙,还是不免存在一定的问题,比如说开始的时候打开不了文件,总是出现错误,自己总也找不出来,后来请教了一下同学,结果发现时代码的编写出现了错误,把代码改过来之后,程序终于可以打开运行了。然后,检查的时候,又发现“查找”运行错误,又是代码那里出现的黄色的字样,结果发现,是代码拼写错误,于是,拿着同学的代码对比一下,发现了错误所在之地,然后更正了过来。

经过一番努力,程序终于做完了。

您现在阅览的是工作总结网-心得体会谢谢您的支持和鼓励!

后来,室友看了我的程序,她说运行不了的,就是出现了错误,出现了错误,就应该改过啊,这时的我才恍然大悟。“是错误,那么就要改正的!”于是当天,我就去了学校机房,再一次运行我的程序,仍然出现错误情况,需要调试,我回忆起上课的时候,老师是怎么跟我们讲的,哪里出现了错误,需要怎么样改正。于是,我就耐着性子,一个一个,一个一个得改正,编辑代码,一个一个得检查,终于完成了。完成之后,我在运行一下,一切正常,心里终于舒了一口气。经过这次的VB程序设计,让我知道了更多学习的方法。具体如下:(1)保持良好的学习心态,第一,要有自信,自强,积极主动学习。第二,克服畏难情绪,树立学好程序设计的信心(2)要了解概念:VB程序设计本身并不复杂,变量,函数,条件语句,循环语句等概念较多。要真正能进行程序设计,就要深入理解这些概念。应该重视概念的学习。

(3)自己动手编写程序,亲自动手进行程序设计是培养逻辑思维的好方法。因此我们得多动手编写程序,逐渐提高写程序的能力。自己动手,编写一些程序,才会有成就感,进而对课程产生兴趣,做起来才比较从容。等你在编写大量程序之后(4)上机调试程序应注意多问问同学,多问问老师、,把不懂的地方标出来。(5)养成良好的编程习惯,第一,程序构思要有说明;第二,学会如何调试程序;第三,对运行结果要做正确与否的分析。

但是,如果以前上课的时候不认真的听讲的话,做这个程序设计就会有点点困难,所以,同时也在提醒我们,学习,任何时候都要认真!

总之,在此次的VB程序设计中,如果没有足够的耐心,就不可能完成的很好。所以此次VB程序设计,让我做事情更加有耐心,更加细心,学习更加认真仔细。 相关专题:尚无数据

用VB 设计条形码轻印刷系统VB 篇5

分布式监控系统已在工业领域得到广泛应用,许多企业对于中小规模的设备,如中小型热电厂和水电站,出于硬件软件投资利润率和性能价格比的考虑,常常是自行开发或参与开发本企业的监控系统。而许多企业在成套引进大型DCS系统后,也常因实际情况而需要自行开发或改进其监控系统。

分布式监控系统以微机为基础,用数据通信将微机连在一起实现数据共享,从而对工业过程进行集中监视管理和分散控制。因此,分布式监控系统中通信的设计与实现是至关重要的环节。Visual Basic开发语言具有简洁明了、编程效率高、开发周期短的特点,利用

VB中的多种通信手段,可实现分布式监控系统的多种通信功能。

vb课程设计心得体会 篇6

Visual Basic 提供了列表框控件(ListBox)以供用户进行多个项目的选择,在工具箱面板上,列表框控件的图标如图一所示:

图一

默认的列表框控件名为 ListX(X为阿拉伯数字 1、2、3,等等),规则的命名方式为:LstX(X为用户自定义的名字,如 LstName、LstUser,等等)。

一、列表框控件的主要属性:

列表框中可以有多个项目供选择,用户通过单击某一项选择自己所需要的项目,如果项目太多,超出了列表框设计时的长度,则自动增加竖向滚动条,如图二:

图二

除了一些常见的诸如 Font 、Height、Left、Width、Enabled、Name 等属性外,列表框还有一些特殊的属性:

1、List(列表)属性:

List 是列表框最重要的属性之一,其作用是罗列或设置表项中的内容。可以在界面设置时直接输入内容,如图三:

图三

在程序运行时,列表框中所有的选项,都可以通过 List(下标值) 的形式表示。比如列表框中的第一项,用 List(0)表示,列表框中的第二项,用 List(1)表示,列表框中的第十项,用 List(9)表示,以此类推。

大家注意,列表框中的第一项,是 List(0) ,而不是 List(1) 。

<1>、List 属性的使用是非常灵活的,比如我们要从如图二的列表框(Lst1)中取出第三项内容,可以用下面的代码做到:A$ = Lst1.List(2)

其中,A 是一个变量;$ 指明了这个变量的类型:字符串型;这句话的意思是:将 Lst1 列表框中第三项(List(2))取出来然后赋值给字符串变量 A 。

象上面这种赋值办法,在 VB 中是非常普遍的,又如以前我们学到的:

LblShow.Caption = “Visual Basic”,这句话是指将 Visual Basic 这个字符串赋值给 LblShow 标签控件并作为其标题。

紧接上面的内容,假设我们用一个标签显示出刚才取出的表项:

LblShow.Caption = A$

那么显示的结果正是我们取出的选项。

可见,取出某个列表框中的某一表项并将其赋值给某个变量,代码如下:

字符串变量 = 列表框名称。List(X) ,其中,X 是下标。

<2>、通过 List() 改变原有表项:假设我们要将如图二的列表框中第三项内容改为“跟我学 VB”,只需输入下面的代码即可:

Lst1.List(2) = “跟我学 VB”

上句话的意思是将“跟我学 VB”字符串赋值给 Lst1 并作为其第三项的内容,

结果如图四:

图四

可见,要修改某个列表框中某一选项:

列表框名称。List(X) = “欲修改成的内容” ,其中,X 是下标。

2、ListCount 属性:

本属性返回列表框表项数量的数值,只能在程序运行时起作用。比如:一个有着四种选项的列表框,那么 ListCount 就为 4 ;一个列表框有五个选项,那么 ListCount 就为 5 。

返回一个列表框的表项数量值并将其赋值给某个变量,代码如下:

数值型变量 = 列表框名称。ListCount

比如要返回图二列表框的 ListCount:

X% = Lst1.ListCount ,其中,X 是变量,% 表示X是整数类型的变量。

3、ListIndex(索引)属性:

本属性用来返回或设置控件中当前选择项目的索引号,只能在程序运行时使用。第一个选项的索引号是 0 ,第二个选项的索引号是 1 ,第三个选项的索引号是 2 ,依此类推,ListCount 始终比最大的 ListIndex 值大 1 。当列表框没有选择项目时, ListIndex 值为 -1 。

在程序中设置 ListIndex 后,被选中的项目呈反相显示,如图五:

图五

在列表框控件的所有属性中,本属性是非常重要的,因为一个列表,事先你并不知道用户将要选择哪一条项目,这时,只有根据 ListIndex 返回的数值,我们才能让程序针对用户的选择做出适当的反应。

返回 ListIndex 的代码如下:

X% = 列表框名称。ListIndex

联想:根据前面的知识我们知道,要取出第三项内容,代码如下:

A$ = Lst1.List(2)

假设现在选中的是第三项,但我们事先不知道用户要选择这一项,那么又应该如何访问这第三项呢?

代码如下:A$ = Lst1.List(Lst1.ListIndex) 此时,Lst1.ListIndex 等同于 2 。

仔细想一想,为何要如此书写?

4、Columns(列)属性:

本属性用来确定列表框的列数,当值为 0 时,所有项目呈单列显示;当值为 1 或者大于 1 ,项目呈多列显示。Columns 属性只能在界面设置时指定。如图六:

VB教学案例设计的总体思路及其实例解析 篇7

用VB 设计条形码轻印刷系统 ---- 条 形 码 技 术 简 介 ---- 条 形 码 作 为 一 种 识 别 输 入 技 术, 由 于 其 显 而 易 见 的 快 速、准 确、低 廉 等 优 点, 被 广 泛 应 用 于 商 品 流 通、图 书 馆 管 理 等 众 多 的 自 动 化 管 理 系 统 中,

用VB 设计条形码轻印刷系统

---- 条 形 码 技 术 简 介

---- 条 形 码 作 为 一 种 识 别 输 入 技 术, 由 于 其 显 而 易 见 的 快 速、准 确、低 廉 等 优 点, 被 广 泛 应 用 于 商 品 流 通、图 书 馆 管 理 等 众 多 的 自 动 化 管 理 系 统 中。

---- 条 形 码 是 利 用 条( 着 色 部 份)、空( 非 着 色 部 份) 及 其 宽、窄 的 交 替 变 换 来 表 达 信 息。 每 一 种 编 码, 都 制 定 有 字 符 与 条 空、宽 窄 表 达 的 对 应 关 系, 只 要 遵 循 这 一 标 准 打 印 出 来 的 条、空 交 替 排 列 的“ 图 形 符 号”, 这 一“ 图 形 符 号” 中 就 包 含 了 字 符 信 息; 当 识 读 器 划 过 这 一“ 图 形 符 号” 时, 这 一 条、空 交 替 排 列 的 信 息 通 过 光 线 反 射, 在 识 读 器 内, 这 种 光 信 号 被 转 换 成 数 字 信 号, 再 经 过 相 应 的 解 码 软 件, 就 能 将“ 图 形 符 号” 还 原 成 字 符 信 息。

---- 三 九 码 是 一 种 应 用 比 较 普 遍 的 条 形 码, 它 长 度 可 变、可 校 验, 容 纳 的 字 符 多 达43 个( 包 括 数 字0~9、字 母A~Z 及 其 它 七 个 特 殊 字 符)。 由 于 在 表 示 每 一 字 符 时, 使 用9 个 元 素, 其 中3 个 宽 元 素、6 个 窄 元 素, 故 名39 码, 这3 个 宽 元 素 中 必 须 有 两 个 是 条( 有 四 个 特 殊 用 途 的 字 符 除 外)。 如 字 母“J” 的 编 码 规 则 为:“N N N N W W W N N”, 其 中N 表 示 窄 元 素,W 表 示 宽 元 素, 奇 数 位 为 条 元 素, 偶 数 位 为 空 元 素, 宽 窄 元 素 的 宽 度 尺 寸 比 为2~3, 且 在 同 一 个 条 码 中 必 须 是 固 定 的。 在 打 印 制 作 条 形 码 时, 条 是 需 要 打 印( 着 色) 的, 而 空 元 素 内 不 必 打 印 的, 不 过 要 将 其 宽 度 计 算 在 内。 对 于 某 一 要 打 印 的 字 符 串, 按 其 先 后 顺 序 打 印, 串 前 串 后 各 加 一 个“*” 符 号 做 为 起 始 符 与 终 止 符, 相 邻 的 字 符 间 在 打 印 时 由“ 位 空” 分 隔,“ 位 空” 类 似 空 元 素, 即 不 着 色 部 分, 其 宽 度 应 小 于1.35mm, 为 编 程 方 便, 通 常 取 为 一 个 窄 元 素 的 宽 度。

---- 条 形 码 的 制 作 有 制 版 印 刷、轻 印 刷 两 种 方 式, 轻 印 刷 是 指 使 用 普 通 打 印 机, 在 计 算 机 控 制 下 制 作 条 形 码。 这 种 制 作 方 法 灵 活, 成 本 较 低, 即 适 宜 于 同 一 号 码 的 单 条 制 作, 也 可 用 于 同 一 号 码 的 大 量 制 作, 这 一 特 点 是 制 版 印 刷 无 可 替 代 的。 使 用 计 算 机 软 件 打 印 条 形 码, 其 原 理 是 将 条 形 码 作 为 图 形 来 看 待, 用 编 程 语 言 中 的 绘 图 语 句- 画 矩 形 框, 在 相 应 的 坐 标 上 画 出 各 种 宽 度 不 同 的 条 元 素, 这 样 即 可 实 现 条 形 码 的 计 算 机 软 件 打 印。

---- VB 中 几 种 打 印 功 能 在 条 码 打 印 时 的 比 较

---- Visual Basic 是近年 来 比 较 流 行 的 编 程 语 言, 功 能 强 大, 易 学 易 用。Visual Basic 对 打 印 功 能 提 供 了 两 种 输 出 方 式: 一 是 首 先 将 条 码 输 出 到 某 一 对 象, 再 使 用 该 对 象 中Print 方 法, 将 其 输 出 到 打 印 机; 二 是 使 用 打 印 机 对 像Printer 绘 图。 下 面 对 这 种 方 法 做 个 比 较:

---- 一、将 条 形 码 图 在 窗 体 上 绘 出, 再 使 用PrintForm. 方 法 打 印 窗 体。

窄 条 打 印:Line (x,y)-step(i,h),,bf

宽 条 打 印:Line (x,y)-step(3*i,h),,bf 或

Line (x,y)-step(2*i,h),,bf

---- 再 使 用formname.PrintForm. 将 条 形 码 输 出 到 打 印 机。

---- 在 这 种 方 式 下, 窗 体 的 量 度 单 位 可 以 有:twip, point, picel 三 种 其 中 以twip 为 单 位 为 最 小。

---- 以twip 为 单 位, 对 条 形 码 来 说, 打 印 精 度 可 达30, 即 当 窄 元 素 宽 度 必 须 等 于 或 大 于30 时, 打 印 出 来 的 条 形 码 可 以 阅 读, 若 窄 元 素 的 宽 度 小 于30, 条 形 码 中 相 邻 的 条 会 粘 连 在 一 起, 无 法 识 读。 当 窄 元 素 宽 度 为30 时,“J10059” 六 位 字 符 条 码 尺 寸 为:67mm。

---- 以Picel 为 单 位, 打 印 精 度 可 达2, 当 窄 元 素 宽 度 为2 时,“J10059” 六 位 字 符 条 形 码 尺 寸 为80 mm 以 上。

---- 以Point 为 单 位, 打 印 精 度 可 达2, 当 窄 元 素 宽 度 为2 时,J10059 六 位 字 符 条 形 码 尺 寸 为110MM。

---- 二、直 接 使 用Printer.Line , 在 打 印 机 上 绘 画- 画 矩 形 框

窄 条 打 印:Printer.Line (x,y)-Step(i,h),,bf

宽 条 打 印:Printer.Line (x,y)-Step(3*i,h),,bf 或

Printer.Line (x,y)-Step(2*i,h),,bf

---- 用Printer.Line 打 印, 量 度 单 位 为 点, 最 小 精 度 为 达10, 当 窄 元 素 宽 为10 时,J10059 六 位 字 符 之 条 码 尺 寸 为:21MM。

---- 根 据 以 上 的 比 较, 使 用 第 二 种 方 法 打 印 输 入 的 条 形 码 精 度 最 高( 同 样 的 字 符 数, 尺 寸 最 短)。 很 显 然, 不 同 的 打 印 方 式, 分 别 有 不 同 的 适 用 范 围, 对 尺 寸 宽 度 要 求 不 高 的 情 况 下, 可 以 使 用 第 一 种 打 印 方 式, 若 对 条 形 码 尺 寸 要 求 较 严 格, 则 使 用 第 二 种 打 印 方 式 更 合 适。

---- 软 件 设 计

---- 一、菜 单 设 计: 由 于 条 形 码 轻 印 刷 软 件 相 对 说 来 是 一 个 很 小 的 系 统, 需 要 选 择 的 项 目 不 多, 可 以 不 设 置 菜 单, 而 将 全 部 的 操 作 由 窗 体 控 件 来 完 成,

如 果 使 用 上 述 的 第 一 种 打 印 方 式, 则 必 须 建 立 另 一 窗 体, 用 于 第 一 步 的 输 出 条 形 码 图 形。

---- 二、设 计 窗 体 控 件: 窗 体 中 的 控 件 包 括 两 大 类, 即: 参 数 设 置 框、打 印 操 作 按 钮。 本 列 设 计 的 窗 体 见 图 示。 本 列 给 出 的 是 一 个 对 参 数 没 有 设 置 功 能 的 窗 体, 有 兴 趣 的 读 者 可 以 在 此 基 础 上 自 行 补 充 它。

---- 对 于 打 印 参 数, 对 条 形 码 的 打 印 来 说, 需 要 指 定 的 参 数 大 致 有: 条 码 宽 窄 比: 3:1~2:1; 条 码 高; 窄 元 素 宽 度; 打 印 机 类 型 及 端 口; 打 印 份 数; 打 印 纸 尺 寸 规 格; 每 行 条 形 码 数; 每 个 条 码 的 字 符 数; 是 否 自 动 增 值 打 印; 增 值 步 长; 每 一 页 行 计 数 起 止 数; 终 止 码 等。

---- 本 列 设 计 了 八 个 按 钮, 其 作 用 分 别 是:

---- Begin- 单 号 条 形 码 打 印 开 始

---- Auto- 自 动 增 值 打 印 开 始

---- Page- 将 打 印 机 内 存 中 的 条 码( 不 足 一 页) 打 印 出 来

---- Cancel- 中 止 自 动 增 值 打 印

---- Delete- 清 除 打 印 机 内 存 中 的 未 打 印 条 码

---- Help- 帮 助 信 息

---- About- 版 本 及 设 计 信 息

---- Exit- 关 闭 系 统

---- 三、程 序 流 程:

---- 在 本 例 中, 条 形 码 的 打 印 分 为 单 号 打 印; 自 动 增 值 打 印 两 种。 单 号 打 印, 是 用 户 输 入 一 个 或 几 个 需 要 打 印 的 号 码 的 打 印 方 式; 而 自 动 增 值 打 印 是 用 户 指 定 起 始 号、终 止 号 及 增 加 步 长, 由 机 器 自 动 生 成 被 打 印 号 码 来 打 印。 其 实 这 两 种 方 式 在 打 印 时 的 操 作 是 完 全 一 样 的, 不 同 之 处 在 于 被 打 号 码 的 获 取, 需 要 注 意 的 是 由 于39 码 字 符 集 中 包 括 字 符, 在 自 动 增 值 时 要 与 纯 数 字 码 区 别。

---- 下 面 以 单 号 打 印 为 例, 介 绍 条 形 码 打 印 的 程 序 流 程。

---- 1 . 检 查 各 项 参 数 设 置 是 否 完 全 正 确, 若 正 确, 则 继 续, 否 则 退 出;

---- 2 . 获 取 各 项 参 数 设 置;

---- 3 . 为X 坐 标 取 初 值( 纸 的 左 边 打 印 边 界);

---- 4 .( 循 环A) 是 否 打 印 完 一 行(I 条 条 码) ? 是 则 转14;

---- 5 . 本 条 条 码 是 否 为 空 ? 是 则 将 横 坐 标 加 上 一 条 条 码 之 宽 度;

---- 6 . 打 印 起 始 符;

---- 7 .( 循 环B) 是 否 打 印 完 本 条 条 码(J 个 字 符) ? 是 则 转10;

---- 8 . 打 印 一 个 字 符 的 条 码;

---- 9 .( 循 环B) 下 一 个 字 符;

---- 10 . 打 印 终 止 符;

---- 11 . 修 改X 坐 标;

---- 12 .( 循 环A) 下 一 条 条 码

---- 13 . 修 改Y 坐 标;

---- 14 . 打 印 本 行 每 一 条 码 的 人 工 识 别 字 符;

---- 15 . 本 页 是 否 已 打 满 ? 是 则 打 印, 并 对 新 页 坐 标 初 始 化;

---- 16. 退 出

---- 四、程 序 代 码:

---- 用 于 检 查 参 数 设 置 正 确 性 的 程 序 主 要 从 各 项 参 数 间 的 关 系 去 检 查。 如 根 据 使 用 的 宽 度、高 度、每 行 条 码 数, 判 断 是 否 超 出 了 纸 的 打 印 范 围; 输 入 的 号 码 是 否 合 法 等。

---- 可 以 为 每 字 符 设 计 一 段 各 自 的 打 印 程 序, 这 种 方 式 编 程 简 单。 也 可 以 将 打 印 程 序 与 条 形 码 的 编 码 规 则 分 离, 通 过 参 数 传 递 某 一 字 符 的 编 码 规 则, 不 同 的 字 符 共 享 同 一 打 印 程 序。 本 列 采 用 前 一 种 方 式。 如 字 母“J” 的 编 码 规 则 为:“N N N N W W W N N”, 打 印 程 序 代 码 如 下:

Private Sub prn_J

Printer.Line (x, y)-Step(widt, high), , BF 注释:打印窄条

x = x + widt 注释:改变X坐标

x = x + widt 注释:打印窄空

Printer.Line (x, y)-Step(widt, high), , BF

x = x + widt

x = x + widt

Printer.Line (x, y)-Step(w_n * widt, high), , BF 注释:打印宽条

x = x + w_n * widt 注释:改变X坐标

x = x + w_n * widt 注释:打印宽空

Printer.Line (x, y)-Step(w_n * widt, high), , BF

x = x + w_n * widt

x = x + widt

Printer.Line (x, y)-Step(widt, high), , BF

x = x + widt

x = x + widt 注释:打印位空

End Sub

---- 其 中x,y 分 别 为 坐 标 值,w_n 为 宽 窄 元 素 宽 度 比, widt 为 窄 元 素 的 宽 度 值( 点), high 为 条 形 码 高 度, 每 打 印 一 个 条 元 素, 应 立 即 改 变X 坐 标, 以 便 打 印 下 一 个 元 素; 打 印 空 元 素 时, 由 于 是 不 着 色, 只 需 改 变X 坐 标 即 可; 每 一 个 字 符 打 印 结 束 时, 应 打 印 一 个 位 空( 本 列 中 位 空 宽 度 等 于 窄 空)。 其 它 的42 个 字 符 的 编 码 规 则, 读 者 可 以 在 有 关 条 形 码 技 术 的 文 献 中 查 到。

原文转自

一键复制全文保存为WORD
相关文章