Visual Basic 在数控冲程序编写中的应用 G01

    笔者在 Visual Basic 应用方面做了一些有益的探索，并且在实践中收到了实效，现将几个
实例介绍如下，希望能够起到抛砖引玉之作用。
　　一、自动生成零件旋转后的程序

 提高零件排版套裁灵活性

 

图

1

　 　 在 实 际
加 工 过 程 中 ，
经 常 遇 到 同
一 个 零 件 需
要 按 不 同 的
方 位 排 版 ，
以 提 高 材 料
的 利 用 率 情
况 。 例 如 ，
图

1 所示的排版方式肯定比图 2 所示的排版节省材料，而在编程序时，如果按图 2 的方式

排版，只需要编一个数控冲程序即可完成图

2 的排版方式，而如果按图 1 的方式排版，则

要编

A、B 两个数控冲程序才能完成图 1 的排版方式。

 

图

2

　

　

编

A 、 B 两 个
数 控 冲 程 序
显 然 比 较 费
时 ， 在 实 际
加 工 中 要 远
比 此 复 杂 ，
有 没 有 可 能
只编一个程序而通过某种方式得到另一个程序呢？笔者通过

VB 编写了一款数控冲程序旋

转件自动生成的小软件，图

3 是小软件的工作界面。通过输入旋转角度后，可以自动生成将

零件旋转任意角度后的数控冲程序，并且生成的程序可以直接拷入设备使用，极大地提高
了工作效率。

 

图

3

　 　 二 、 对
数 控 冲 程 序
进 行 常 规 检
查

    将 程 序

编 写 失 误 降