vb5c.tmp

一个不错的数控源码是vb的

VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "Tabctl32.ocx"
Begin VB.Form frmVelocityConfig 
   Caption         =   "速度设置"
   ClientHeight    =   8490
   ClientLeft      =   60
   ClientTop       =   285
   ClientWidth     =   8340
   Icon            =   "frmVelocityConfig.frx":0000
   LinkTopic       =   "Form1"
   ScaleHeight     =   8490
   ScaleWidth      =   8340
   StartUpPosition =   2  '屏幕中心
   Begin TabDlg.SSTab SSTab1 
      Height          =   3975
      Left            =   720
      TabIndex        =   526
      Top             =   840
      Width           =   1935
      _ExtentX        =   3413
      _ExtentY        =   7011
      _Version        =   393216
      Style           =   1
      TabHeight       =   520
      TabCaption(0)   =   "Tab 0"
      Tab(0).ControlEnabled=   -1  'True
      Tab(0).ControlCount=   0
      TabCaption(1)   =   "Tab 1"
      Tab(1).ControlEnabled=   0   'False
      Tab(1).ControlCount=   0
      TabCaption(2)   =   "Tab 2"
      Tab(2).ControlEnabled=   0   'False
      Tab(2).ControlCount=   0
   End
   Begin VB.CommandButton cmdApply 
      Caption         =   "应用"
      Height          =   345
      Left            =   7200
      TabIndex        =   2
      Top             =   7920
      Width           =   855
   End
   Begin VB.CommandButton cmdOK 
      Caption         =   "确定"
      Height          =   375
      Left            =   5160
      TabIndex        =   1
      Top             =   7920
      Visible         =   0   'False
      Width           =   975
   End
   Begin VB.CommandButton cmdCancel 
      Cancel          =   -1  'True
      Caption         =   "取消"
      Height          =   375
      Left            =   6240
      TabIndex        =   0
      Top             =   7920
      Visible         =   0   'False
      Width           =   855
   End
   Begin TabDlg.SSTab frmVelocityConfig 
      Height          =   7695
      Left            =   3840
      TabIndex        =   3
      Top             =   960
      Width           =   8160
      _ExtentX        =   14393
      _ExtentY        =   13573
      _Version        =   393216
      Style           =   1
      Tabs            =   6
      TabsPerRow      =   6
      TabHeight       =   520
      TabCaption(0)   =   "切线"
      TabPicture(0)   =   "frmVelocityConfig.frx":4FBA
      Tab(0).ControlEnabled=   -1  'True
      Tab(0).Control(0)=   "Frame2"
      Tab(0).Control(0).Enabled=   0   'False
      Tab(0).ControlCount=   1
      TabCaption(1)   =   "切弧"
      TabPicture(1)   =   "frmVelocityConfig.frx":4FD6
      Tab(1).ControlEnabled=   0   'False
      Tab(1).Control(0)=   "Frame8"
      Tab(1).Control(0).Enabled=   0   'False
      Tab(1).ControlCount=   1
      TabCaption(2)   =   "铣底"
      TabPicture(2)   =   "frmVelocityConfig.frx":4FF2
      Tab(2).ControlEnabled=   0   'False
      Tab(2).Control(0)=   "Frame1"
      Tab(2).Control(0).Enabled=   0   'False
      Tab(2).ControlCount=   1
      TabCaption(3)   =   "起落"
      TabPicture(3)   =   "frmVelocityConfig.frx":500E
      Tab(3).ControlEnabled=   0   'False
      Tab(3).Control(0)=   "Frame3(1)"
      Tab(3).Control(0).Enabled=   0   'False
      Tab(3).Control(1)=   "Frame7"
      Tab(3).Control(1).Enabled=   0   'False
      Tab(3).ControlCount=   2
      TabCaption(4)   =   "寻点"
      TabPicture(4)   =   "frmVelocityConfig.frx":502A
      Tab(4).ControlEnabled=   0   'False
      Tab(4).Control(0)=   "Frame3(3)"
      Tab(4).Control(0).Enabled=   0   'False
      Tab(4).Control(1)=   "Frame9"
      Tab(4).Control(1).Enabled=   0   'False
      Tab(4).ControlCount=   2
      TabCaption(5)   =   "对刀"
      TabPicture(5)   =   "frmVelocityConfig.frx":5046
      Tab(5).ControlEnabled=   0   'False
      Tab(5).Control(0)=   "Frame10"
      Tab(5).Control(0).Enabled=   0   'False
      Tab(5).ControlCount=   1
      Begin VB.Frame