【VB开源代码栏目提醒】：网学会员鉴于大家对VB开源代码十分关注，论文会员在此为大家搜集整理了“关于Visual Basic 6.0控件数组的使用 - 大学课件”一文，供大家参考学习

关于 Visual Basic 6.0 控件数组的使用 ——计算器 计算机信息管理 目 录引言………………………………………………………………..1正文………………………………………………………………..11 VisualBasic6.0 程序介绍…………………………………….11.1–VisualBasic6.0 中文版工具软件简介…………………...11.2–操作流程……………………………………………………21.2.1–提供可视化的编程工具…………………………………21.2.2–采取“事件驱动”的方式编程…………………………31.3–使用方法……………………………………………………42 程序设计……………………………………………………….52.1–程序需求分析及目的………………………………………52.2–软硬件要求…………………………………………………62.3–控件数组……………………………………………………62.4–系统函数……………………………………………………72.5–计算器流程介绍……………………………………………72.6–控件介绍……………………………………………………82.6.1–文本框……………………………………………………82.6.2–标签………………………………………………………82.6.3–命令按钮…………………………………………………83 运行环境介绍…………………………………………………..94 代码编写过程…………………………………………………..105 软件使用说明…………………………………………………..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）基于特定按钮的索引返回它的引用。

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

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

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

    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 IfEnd Sub单击加，减，乘，除时，所要实现的功能代码Private Sub Command1_ClickIndex As IntegerOn Error Resume Next If Text1.Text Then MsgBox 您没有输入数字请输入 Else sText Text1.Text 在按 Command1 按钮之前输入的数字 sIndex sNumberIndex.Caption 相对应 Command1 的的下标 Text1.Text sBool False End IfEnd 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 Sub2 此操作界面主要实现计算器的扩展功能，如对数字进行高级算法：进制、 整除、平方、立方等数学运算 》按下“》”将会出现高级运算窗体，代码如下Private Sub Button_ClickIf Button.Caption Then Form1.Width 7300 Form1.Height 4200 A.Checked 1 Button.Caption