1、当单击顺圆插补时，直线插补、逆圆插补不可见。e逆圆插补当单击逆圆插补时，直线插补、顺圆插补不可见。f起点坐标终点坐标模块可输入-10到10之间这几个数值g画直线在输入数值后，点击画直线，实现执行画直线的命令。h顺时针画圆弧，逆时针画圆弧当输入数值后，点击此按钮，实现执行画圆弧命令。i连续插补、单步插补在左下框内实现图形，右框内实现插补步骤。J退出单击后退出软件。3.2 插补程序的实现画直线采用的是Microsoft Visual Basic 6.0 中文版中的Line命令实现的，例如：Picture1.Line （x1, y1）-（x2, y2）, RGB（255, 0, 0） ，就是在图片框
2、中从起始坐标 （x1, y1）到终点坐标（x2, y2）画一条红色的直线。再根据上面的插补原理和软件流程图就可以编出插补程序。 画圆弧采用Microsoft Visual Basic 6.0 中文版中的Circle命令实现的，例如： Picture1.Circle （x1, y1）,r, vbRed，就是在图片框坐标中以坐标X1, Y1为圆心画一个半径为r的红色圆。 Picture1.Circle （0, 0）, r1, , n, m，就是图片框中以坐标原点为圆心，以r1为半径，以弧度n为起始点，以弧度m为终点画圆弧。插补界面如图2-14，直线和圆弧的走刀轨迹输出在一个图片框中，插补演示的过程
3、，刀具走的方向，偏差结果，输出工步数等，都在一个指定的文本框中输出，插补类型用三个单选按钮实现。只要选择相应的按钮，在文本框中输入相应的坐标就可以看到所输入坐标直线和圆弧的走刀轨迹了。3.3 Visual Basic语言简介Visual Basic,简称VB，是Microsoft公司推出的一种Windows应用程序开发工具。是当今世界上使用最广泛的编程语言之一，它也被公认为是编程效率最高的一种编程方法。无论是开发功能强大、性能可靠的商务软件，还是编写能处理实际问题的实用小程序，VB都是最快速、最简便的方法。 Visual Basic中的“Visual”指的是采用可视化的开发图形用户界面（GUI
4、）的方法，一般不需要编写大量代码去描述界面元素的外观和位置，而只要把需要的控件拖放到屏幕上的相应位置即可；“Basic”指的是BASIC语言，因为VB是在原有的BASIC语言的基础上发展起来的，至今包含了数百条语句、函数及关键词，其中很多和 Windows GUI 有直接关系。专业人员可以用 Visual Basic 实现其它任何 Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。3.4 Visual Basic 的特点1面向对象VB采用了面向对象设计思想它基本思路是把复杂设计问题分解为个个能够完成独立功能相对简单对象集合所谓“对象”就是个可操作实体如窗体、窗
5、体中命令按钮、标签、文本框等面向对象编程就好像搭积木样员可根据和界面设计要求直接在屏幕上“画出窗口、菜单、按钮等区别类型对象并为每个对象设置属性。2事件驱动 在Windows环境下是以事件驱动方式运行每个对象都能响应多个区别事件每个事件都能驱动段代码事件过程该代码决定了对象功能通常称这种机制为事件驱动事件可由用户操作触发也可以由系统或应用触发例如单击个命令按钮就触发了按钮Click（单击）事件该事件中代码就会被执行若用户未进行任何操作（未触发事件）则就处于等待状态整个应用就是由彼此独立事件过程构成。3软件Software集成式开发 VB为编程提供了个集成开发环境在这个环境中编程者可设计界面、编
6、写代码、调试直至把应用编译成可在Windows中运行可执行文件并为它生成安装VB集成开发环境为编程者提供了很大方便。4结构化设计语言 VB具有丰富数据类型是种符合结构化语言而且简单易学此外作为种设计语言VB还有许多独到的处。5强大数据库访问功能VB利用数据Control控件可以访问多种数据库VB6O提供ADOControl控件不但可以用最少代码实现数据库操作和控制也可以取代DataControl控件和RDOControl控件。6支持对象链接和嵌入技术 VB核心是对对象链接和嵌入（OLE）技术支持它是访问所有对象种思路方法利用OLE技术能够开发集声音、图像、动画、字处理、Web等对象于体。7网络
7、功能 VB6O提供了DltTML（DynamictTML）设计工具利用这种技术可以动态创建和编辑Web页面使用户在VB中开发多功能网络应用软件Software.8多个应用向导 VB提供了多种向导如应用向导、安装向导、数据对象向导和数据窗体向导通过它们可以快速地创建区别类型、区别功能应用9支持动态交换、动态链接技术 通过动态数据交换（DDE）编程技术VB开发能和其他Windows应用的间建立数据通信通过动态链接库技术在VB中可方便地用C语言或汇编语言编写也可Windows接口（API）lO联机帮助功能 在VB中利用帮助菜单和F1功能键用户可随时方便地得到所需要帮助信息VB帮助窗口中显示了有关举例
8、代码通过复制、粘贴操作可获取大量为用户学习和使用提供方便。第4章 VB插补程序代码VERSION 5.00Begin VB.Form 数控插补仿真软件 Appearance = 0 Flat BackColor = &H80000005& Caption = 数控插补仿真演示软件 ClientHeight = 10830 ClientLeft = 165 ClientTop = 555 ClientWidth = 15240 FillColor = &H00C0C0C0& FillStyle = 0 Solid BeginProperty Font Name = 宋体 Size = 36 Ch
9、arset = 134 Weight = 400 Underline = 0 False Italic = -1 True Strikethrough = 0 EndProperty ForeColor = & LinkTopic = Form1 Picture = 程序演示2.frx:0000 ScaleHeight = 191.029 ScaleMode = 6 Millimeter ScaleWidth = 268.817 StartUpPosition = 3 窗口缺省 Begin VB.Frame Frame1 H00FFFF00&插补类型Name = 黑体 Size = 12 It
10、alic = 0 H00FF0000& Height = 1695 Left = 3360 MousePointer = 1 Arrow TabIndex = 16 Top = 2280 Width = 1935 Begin VB.OptionButton Option3 H008080FF&直线插补 Size = 10.5H00000000& Height = 255 Left = 240 MaskColor = &H00FFFFFF& TabIndex = 19 Top = 360 Width = 1215 End Begin VB.OptionButton Option2 逆圆插补 TabIndex = 18 Top = 1320 Begin VB.OptionButton Option1 顺圆插补 TabIndex = 17 Top = 840
