使用宏判断三角形的形状.doc

使用宏判断三角形的形状 宏介绍 什么是宏 Microsoft excel是一款功能非常强大的电子表格软件。它可以轻松地完成数据的各类数学运算，并用各种二维或三维图形形象地表示出来，从而大大简化了数据的处理工作。但若仅利用excel的常用功能来处理较复杂的数据，可能仍需进行大量的人工操作。那可以用宏。宏是一系列命令和函数，存储于 Visual Basic 模块中，并且在需要执行该项任务时可随时运行。宏的引入使具有了无限的扩展性，的强大远远超过人们的想象因而可以很好地解决复杂数据的处理问题。随着支持Windows的应用程序的不断增多和功能的不断增强，越来越多的程序增加了宏处理来方便用户的自由扩展。但初期各应用程序所采用的宏语言并不统一，这样用户每使用一种应用程序时都得重新学习一种宏语言。为了统一各种应用程序下的宏，Microsoft推出了VBA（Visual Basic for Applications）语言。VBA是从流行的Visual Basic编程语言中派生出来的一种面向应用程序的语言，它适用于各种Windows应用程序，可以解决各应用程序的宏语言不统一的问题。除此之外，使用 VBA语言还有如下优点：1、VBA是一种通用程序语言，通过它不仅可以共享Microsoft相关的各种软件（如excel、 word、access）……，而且随着其它的一些软件（如大名鼎鼎的AutoCAD2000）等对VBA的支持，这些软件也已进入到了VBA的控制范 围；2、可以将用VBA编写的程序复制到Visual Basic中调试并运行，从而实现用Visual Basic来控制有关的应用程序；3、VBA提供的大量内部函数大大简化了用户的操作。录制宏的方法来学习宏：点击excel 工具菜单宏“录制新宏，此后可象平时一样进行有关操作，待完成后停止录制。然后再点击工具宏宏编辑选项即可打开刚才所录制的宏的Visual Basic源程序，并且可以在此时的帮助下拉菜单中获得有关的编程帮助。对录制宏进行修改不仅可以学习宏的使用，还能大大简化宏的编写。将安全级设置为“中”或“低”。 在“工具”菜单上，单击“选项”。 单击“安全性”选项卡“宏安全性”。 选择所要使用的安全级。 选择“工具”“宏”“录制新宏” 在“宏名”框中，输入宏的名称。 图1 设置宏安全性级别 图2 设置对vb项目的信任访问 注意 宏名的首字符必须是字母，其他字符可以是字母、数字或下划线。宏名中不允许有空格；可用下划线作为分词符。 宏名不允许与单元格引用重名，否则会出现错误信息显示宏名无效。 如果要通过按键盘上的快捷键来运行宏, 请在“快捷键”框中，输入一个字母。可用 Ctrl+字母（小写字母）或 Ctrl+Shift+字母（大写字母），其中字母可以是键盘上的任意字母键。快捷键字母不允许是数字或特殊字符（如 @ 或 #）。 注意当包含宏的工作簿打开时，宏快捷键优先于任何相当的 Microsoft Excel 的默认快捷键。 在“保存在”框中，单击要存放宏的地址。 如果要使宏在使用 Excel 的任何时候都可用，请选中“个人宏工作簿”。 如果要添加有关宏的说明，请在“说明”框中键入该说明。 执行需要录制的操作。 在“停止录制”工具栏上，单击“停止录制”。 图3 录制新宏 当然，你也可以用 Microsoft Visual Basic 创建宏在 Microsoft Excel 的“工具”菜单上，指向“宏”，再单击“Visual Basic 编辑器”。 在“插入”菜单上，单击“模块”。 将代码键入或复制到模块的代码窗口中。 如果要在模块窗口中运行宏，请按 F5。 编写完宏后，请单击“文件”菜单上的“关闭并返回到 Microsoft Excel”。由键盘快捷键启动宏如果希望通过单击特定按钮或按下特定组合键来运行宏，可将宏指定给某个工具栏按钮 图7 添加控件 2、代码编写。 （1）、首先判断用户输入的三条边是否满足三角形的基本条件。（任意两条边的和大于第三边）。 选择“工具箱”-“设计模式”按钮，进入设计模式。双击“计算三角形形状”按钮，填写按钮双击事件处理代码。如图8所示，代码设计如下。 Private Sub cmdb1_Click() 计算三角形形状 ‘定义三个整形变量接收三角形的三条边 Dim a, b, c As Integer a = CInt(TextBox1.Text)’调用类型转换函数cint将字符型数据转为整形。 b = CInt(TextBox2.Text) c = CInt(TextBox3.Text) ‘判断是否符合三角形基本条件 If (a + b = c) Or (a + c = b) Or (b + c = a) Then MsgBox (不符合三角