【VB开源代码栏目提醒】：文章导读：在新的一年中，各位网友都进入紧张的学习或是工作阶段。

    网学会员整理了VB开源代码-60控件数组的使用 - 技术总结的相关内容供大家参考，祝大家在新的一年里工作和学习顺利！

关于Visual Basic 6.0控件数组的使用 ——计算器 计算机信息管理2003届专科 刘雪昆 目 录 引言………………………………………………………………..1 正文………………………………………………………………..1 1 VisualBasic6.0程序介绍…………………………………….1 1.1–VisualBasic6.0中文版工具软件简介…………………...1 1.2–操作流程……………………………………………………2 1.2.1–提供可视化的编程工具…………………………………2 1.2.2–采取“事件驱动”的方式编程…………………………3 1.3–使用方法……………………………………………………4 2 程序设计……………………………………………………….5 2.1–程序需求分析及目的………………………………………5 2.2–软硬件要求…………………………………………………6 2.3–控件数组……………………………………………………6 2.4–系统函数……………………………………………………7 2.5–计算器流程介绍……………………………………………7 2.6–控件介绍……………………………………………………8 2.6.1–文本框……………………………………………………8 2.6.2–标签………………………………………………………8 2.6.3–命令按钮…………………………………………………8 3 运行环境介绍…………………………………………………..9 4 代码编写过程…………………………………………………..10 5 软件使用说明…………………………………………………..15 结论………………………………………………………………..15 致谢………………………………………………………………..16 主要参考文献……………………………………………………..16 关于Visual Basic 6.0控件数组的使用 ——计算器 中文摘要 本论文是通过Visual Basic 6.0可视化开发界面解决在单一窗体中使用多组控件的操作还有是对系统函数的介绍使用。

    把书本上的知识转移到实践操作过程中使用控件数组对程序设计可以把多个相同的控件有序的结合在一起从而达到通过数组下标对代码的初步完善并且便于管理与控制使之在程序完成后更加方便操作和使用的目的 关键词 Visual Basic 6.0、控件数组、系统函数、程序控制 关于Visual Basic 6.0控件数组的使用 —计算器 引言 Visual Basic简称VB是近年来得到迅速推广和应用的一种可视化的计算机高级语言它适用于面向对象的程序设计。

    由于计算机技术的迅速发展字符界面的DOS操作平台已让位于图形界面的Windows平台人们需要在Windows平台上开发应用程序。

    Visual Basic因其易学易用受到广大初学者和程序开发人员的喜爱。

     正文 1 VisualBasic6.0程序介绍 1.1–VisualBasic6.0中文版工具软件简介 VB经过微软公司长期不断的完善、第三方资源的大量加入以及广大爱好者的大力支持Visual Basic 6.0已经成为功能强大、使用人数众多的主流编程工具。

    它提供了向导自动生成代码支持拖放技术、属性检查、实时语法检查等内置自动化技术大大降低了编写代码的工作量同时它还提供了极其丰富的控件使得Visual Basic 6.0成为最简捷、最有效的开发Windows应用程序工具。

    随着网络技术的不断发展Visual Basic 6.0的应用范围已从开发单机软件发展的开发网上分布式应用软件。

    Visual Basic 6.0不但受到广大初、中级计算机爱好者的欢迎也越来越受到高级程序员的欢迎。

     1.2–操作流程 1.2.1–提供可视化的编程工具 用传统的高级语言编程序主要的工作是设计算法和编序程序。

    程序的各种功能和显示的结果都要有程序语句来实现。

    而用Visual Basic 6.0开发应用程序包括两部分工作一是设计用户界面二是编写程序代码。

     Visual Basic 6.0为程序设计人员提供图形对象窗体、控件、菜单等以进行应用程序的界面设计。

    例如程序设计人员可以根据用户的需要在屏幕上画出用户界面。

    在传统的程序设计中为了在屏幕上显示出一个图形就必须编写一大段程序语句。

    而Visual Basic 6.0使屏幕设计变得十分简单。

    Visual Basic 6.0提供一个“工具箱”箱内放有若干个“控件”。

    程序设计者可以自由地从工具箱中取出所需控件放到窗体中的指定位置而不必为此编写程序。

    也就是说屏幕上的用户界面是用Visual Basic 6.0提供的可视化设计工具直接“画”出来的而不是用程序“写”出来的。

    设计用户界面如同用各种不同的印章在一张画纸上盖出不同的图形。

    被认为是最难的界面设计就这样轻而易举地解决了。

    其实这些编程工作只是不用用户来做而由Visual Basic系统完成而已。

     所谓用户界面设计就是要设想让用户看到什么。

    Windows之所以比DOS受欢迎就是因为具有生动直观、对用户“友好”的界面。

    现在Visual Basic 6.0成功地解决了用户界面设计的难点这就为设计应用程序提供了良好的基础。

     1.2.2–采取“事件驱动”的方式编程 在设计好用户界面后才开始编写程序。

    Visual Basic 6.0中的编程与传统的编程方法不同。

     传统的编程方法是根据程序应实现的功能写出一个完整的程序包括一个主程序和若干个子程序。

    在执行时从第一个语句开始直到结束语句为止。

    在执行过程中除了需要用户输入数据时暂停外程序开始运行后不停顿地按程序中指定的顺序执行各指令直到程序结束。

    因此程序设计者必须十分周到地考虑到程序运行中的每一个细节什么时候应发生什么事情什么时候屏幕上应出现什么。

    因此对编写应用程序的程序设计人员提出较高的要求。

     Visual Basic 6.0改变了程序的结构和运行机制没有传统意义上的主程序使程序执行的基本方法是由“事件”来驱动子程序在Visual Basic 6.0中将“子程序”称为“过程”的运行。

    例如在屏幕上已画出了一个“相乘”的按钮用户用鼠标此按钮就产生一个“单击鼠标事件”由此执行一个相应的“单击鼠标事件过程”该过程应执行将两个数相乘的操作。

    执行完该过程后程序暂停等待用户下一次操作。

     如果屏幕上画有6个命令按钮如相加、相减、相乘、相除、求余和平方用户单击其中一个按钮该按钮就产生一次“单击鼠标事件”。

    每一个命令按钮都有相应的“单击事件过程”单击不同的按钮就执行不同的程序执行不同的操作。

    程序设计人员只须分别编写出这样一些单个的过程即可。

    一般来说每个过程要实现的功能是单一的如上述“相乘”操作过程的规模一般不会太大。

    也就是说把原来一个由统一控制的包罗万象的大程序分解为许多个独立的、小规模的过程分别由各种“事件”来驱动执行大大降低了程序人员编程的难度。

     Visual Basic 6.0是面向对象的、结构化的计算机语言。

    Visual Basic 6.0的界面由对象窗体和控件组成每个对象由若干个属性程序人员的任务是设计这些对象和对象的事件过程。

    Visual Basic 6.0的语法与QBASIC基本相同学过Quick BASIC和QBASIC的人无须任何训练便可很熟练地进行Visual Basic 6.0编写代码的工作。

     我写的论文将以Visual Basic 6.0为基础介绍用Visual Basic 6.0进行程序设计的有关概念和方法。

     1.3–使用方法 Visual Basic 6.0是微软公司推出的可视化编程工具MSDN之一是目前世界上使用最广泛的程序开发工具。

    如果你是一个对编程一无所知而又迫切希望掌握一种快捷实用的编程语言的初学者那选择Visual Basic 6.0没错的。

    即使考虑到VB程序本身编译和运行效率较低的不足单是它的快捷的开发速度简单易学的语法体贴便利的开发环境它仍不失一款优秀的编程工具是初步学习开发软件的首选。

    从对编程一窍不通或从未接触过编程的状态通过学习能够对Visual Basic 6.0的编程环境比较熟悉掌握VB开发界面的使用方法对VB语言的基本语法大致了解知道常见的语句的意义学习VB常用控件的使用方法并能将它们灵活运用到应用程序中能开发简单的VB程序。

    到那时已经能够继续深入的学习VB编程可以继续参与到程序设计栏目其他版块的学习中去。

    然后谈谈学习编程的方法万事开头难刚刚开始学习可能会遇到些困难的问题。

    不过编程是一个不断学习不断积累的过程编程的乐趣也正是存在于学习的过程中。

    我在自学中每学一点就赶快把它用到实际的程序中去自己多学多用多实践水平才能不断提高这就是“学以致用”。

     2 程序设计 2.1–程序需求分析及目的 在当今社会中计算机的使用在工作和学习当中更加被人们所重视计算机语言也愈来愈多的被人们所使用其中VB语言是最容易学习的一种计算机语言之一我设计的计算器就是选择用Visual Basic 6.0的控件数组来编译的。

    由于VB提供可视化的编程工具为程序设计人员提供了图像对象窗体、控件、菜单等以进行应用程序的界面设计所以要比用传统的高级语言编程序要简单很多。

    我们对于控件数组的使用在学校的学习当中并没有太深入的理解所以我选择以控件数组为基础制作了一个关于计算器使用的程序希望可以通过在自己设计和编程的过程当中对Visual Basic 6.0更加以认识。

    我对控件数组的理解是它与普通的控件按钮在程序运行方面没有什么太大的区别但在编码的时候区别就显露出来。

    其主要在于使用多个按钮控件时并且起到的作用都一致。

    这时候使用控件数组是最方便和最便于管理和控制的方法。

    每个控件数组都有一个固定下标它是用来在编码时对它加以调用从而可以实现在一个过程当中同时对多个控件数组进行操作和控制的作用。

    我来设想一下如果不用控件数组来对对象进行操作而改用普通按钮的话那不光是在编码时花出控件数组多的多的时间而且在执行的过程当中还不敢肯定代码的完整性这也是我使用控件数组来编写计算器的原因。

    Visual Basic 6.0是WINDOWS晚期开发的高级编程语言它与C、C都有共同之处但Visual Basic 6.0与低级语言最大的区别在于VB是一种有着开发界面而且是通过过程对象事件等方法来对程序加以分析和修改使之更便于开发者对程序的控制还可以更清楚的了解到程序的具体流程。

    当然在晚期Visual Basic 6.0的开发当中还出现了升级版本比如说Visual Basic .net它又比原版的Visual Basic 6.0对流程的控制更加以了改进。

    也就是说对待程序开发这门课程我们不应该停止不前而是采取活到老学到老的精神对它来进行钻研。

    只用这样我们才能不断的提高和进步在社会的竞争当中处在一个不败之地让我们拥有一个更好的明天以上我说的这些就是我为什么选择此次题目的主要原因和目的。

     2.2–软硬件要求 本程序必须基于Windows9x/xp系统核心以上才能正常运行。

     2.3–控件数组 数组为共享公用功能的一组控件一起工作提供了便捷的途径。

    例如一组控件可能用于显示相关的数据或者在被点击时提供相关的行为。

    Visual Basic本身并不支持控件数组的建立但是你可以通过编程复制控件数组的所有功能。

    本文介绍复制控件数组功能的简单组件的建立。

    使用相同的名称与索引访问一组控件允许用编号检索和设置数据项并且在整个数组中重复。

    多个对象使用同一个事件处理程序event handler处理事件在这些事件中检索和使用索引在运行时动态添加或者删除控件。

     Visual Basic允许你复制与控件数组相关的一些功能。

    例如你能使用委托把多个对象的事件绑定到一个事件处理程序。

    但是如果把这些功能合并到一个动态的、容易管理的组件中更加简便。

    现在已经建立了建立和跟踪数组中控件的途径但是还必须把它们暴露给开发者。

    可以通过属性实现这个功能。

    可以建立默认属性Visual Basic或索引器C基于特定按钮的索引返回它的引用。

    这样就能编程使用典型控件数组中的MyButtonArraymyIndex语法了。

    可以看到怎样建立方法来动态地给窗体添加和删除控件怎样通过默认属性或者索引器暴露对象。

    这样一来自己编写的代码就可以在控件数组中使用过为组件编写自定义代码来扩展控件数组。

     2.4–系统函数 Visual Basic 6.0提供了许多常用的函数并把他们编写成一个个子程序用户在使用时只须写出它的名字即函数名就可以直接引用。

    这些函数成为标准函数。

     标准函数可按功能分为数值函数、转换函数、字符串函数、日期函数和其他函数等。

    在我的毕业设计中主要有 Sqrx 求x的平方根 StrN 把数值N转换成字符 整除 Oct 8进制 Hex 16进制 2.5–计算器流程介绍 我所编写的计算器软件主要是通过VisualBasic6.0中控件数组来实现主要功能。

    所需要的控件主要有按钮、文本框、标签、菜单控制器和状态栏这些控件在程序运行时所起到的作用都很重要并且联系到整个程序运行的效果。

    在编写的初期主要是理解计算器控制流程其实就是算法。

    我是以控件数组为主要操作来配合代码的编写从而实现对所选择的数字进行全局控制化。

    在按每一次数字按钮时分别把所选的数字存放在一个临时变量中这样就可以在运行的时候对所选择的数字进行加减乘初达到运算中所得到的最终结果。

     2.6–控件介绍 2.6.1–文本框 程序运行中需要通过键盘接受用户输入的信息或把有关信息显示在屏幕上。

    栽Visual Basic 6.0中可以用文本框和标签实现接收信息和显示信息。

    在文本框中可以指定所显示或输入的文字的字体、字体大小、但是需要注意的是在一个文本框中只能显示同一种字体和字体大小。

     2.6.2–标签 文本框既可以用于输入文字又可以用于输出信息使用起来很方便。

    但是有时只需要显示某些信息而不需要在程序运行时向它输入信息这是最好不用文本框以免因为操作而改变文本框中的内容。

    用Visual Basic 6.0提供的标签可以较好地解决这个问题。

     2.6.3–命令按钮 命令按钮支持单击时间。

    在Visual Basic 6.0应用程序中用户通过单击命令按钮触发相应的事件过程执行指定的操作以实现指定的功能。

    用户只须“按下”不同的按钮就可以让计算机完成不同的操作使程序的运行变得既简单又形象。

    用户用鼠标单击命令按钮时命令按钮呈现出被按下的状态使用户有按下一个真实按钮的感觉。

     3 运行环境介绍 Windows XP是Microsoft 继Windows 2000和Windows Millennium之后推出的新一代Windows 操作系统。

    Windows XP将Windows 2000的众多优点例如基于标准的安全性、易管理性和可靠性与Windows 98和Windows Me的最佳特性即插即用、易于使用的用户界面以及独具创新的支持服务完美集成在一起从而打造出了迄今为止最为优秀的一款Windows操作系统产品。

     从技术角度入手对Windows XP的新增功能特性进行了广泛概述。

    文章展示了新的技术和功能是如何使用户完成日常工作、共享信息、管理桌面、实现高效移动办公、获得帮助和支持以及执行其它计算任务的工作变得更加轻松的。

     Windows XP在现有Windows 2000代码基础之上进行了很多改进并且针对家庭用户和企业用户的不同需要提供了相应的版本Windows XP Home Edition和Windows XP Professional。

     4 代码编写过程 1 此操作界面主要实现操作对数字进行加减程序 程序运行时自动加载控件数组的caption Private Sub Form_Load Form1.Width 4000 Form1.Height 4200 Text1.Enabled False For i 0 To sNumber.Count - 1 sNumberi.Caption i Next i End Sub 单击0-9按钮时所响应的过程代码 Private Sub sNumber_ClickIndex As Integer Dim sCstr As String sCstr CStrIndex 转换成STRING If sBool False Then Text1.Text sCstr sBool True Else Text1.Text Text1.Text sCstr End If End Sub 单击加减乘除时所要实现的功能代码 Private Sub Command1_ClickIndex As Integer On Error Resume Next If Text1.Text Then MsgBox 您没有输入数字请输入 Else sText Text1.Text 在按Command1按钮之前输入的数字 sIndex sNumberIndex.Caption 相对应Command1的的下标 Text1.Text sBool False End If End Sub 按下号是所计算出最终结果的执行代码 Private Sub sEnter_Click Dim sNum1 As Double sNum2 As Double sNum As Double On Error Resume Next 报错函数 If Text1.Text Then MsgBox 您没有输入要计算的数字 Else sNum1 CDblsText 转换成DOUBLE sNum2 CDblText1.Text Select Case sIndex Case 0 sNum sNum1 sNum2 Case 1 sNum sNum1 - sNum2 Case 2 sNum sNum1 sNum2 Case 3 sNum sNum1 / sNum2 Case 4 sNum sNum1 Mod sNum2 Case 5 sNum sNum1 sNum2 End Select If LeftsNum 1 . Then sNum sNumber1.Caption sNum sNum 0 sNum sNum i sNum End If Text1.Text sNum sBool False If LeftText1.Text 1 . Then Text1.Text 0 sNum End If End If End Sub 2 此操作界面主要实现计算器的扩展功能如对数字进行高级算法进制、整除、平方、立方等数学运算 按下“》》”将会出现高级运算窗体代码如下 Private Sub Button_Click If Button.Caption Then Form1.Width 7300 Form1.Height 4200 A.Checked 1 Button.Caption