fmbsup.frm

利用Visual basic 构建POS进销存源码

VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
Begin VB.Form FMBSUP 
   Caption         =   "厂商数据处理"
   ClientHeight    =   6600
   ClientLeft      =   3375
   ClientTop       =   3105
   ClientWidth     =   9885
   LinkTopic       =   "Form1"
   ScaleHeight     =   6600
   ScaleWidth      =   9885
   Begin VB.CommandButton BTN_QUT 
      Caption         =   "结束"
      Height          =   615
      Left            =   8040
      Picture         =   "FMBSUP.frx":0000
      Style           =   1  'Graphical
      TabIndex        =   81
      Top             =   5400
      Width           =   1695
   End
   Begin VB.Frame Frame1 
      Caption         =   "查询"
      Height          =   1455
      Left            =   4920
      TabIndex        =   72
      Top             =   5040
      Width           =   3015
      Begin VB.TextBox LB_BSCNA 
         Height          =   270
         Left            =   840
         TabIndex        =   77
         Top             =   1080
         Width           =   975
      End
      Begin VB.CommandButton Command1 
         Caption         =   "清除"
         Height          =   375
         Left            =   1920
         TabIndex        =   76
         Top             =   960
         Width           =   1000
      End
      Begin VB.TextBox LB_BSNAM 
         Height          =   270
         Left            =   840
         TabIndex        =   75
         Top             =   720
         Width           =   975
      End
      Begin VB.TextBox LB_BSENO 
         Height          =   270
         Left            =   840
         TabIndex        =   74
         Top             =   360
         Width           =   975
      End
      Begin VB.CommandButton BTN_SEA 
         Caption         =   "查询"
         Height          =   495
         Left            =   1920
         TabIndex        =   73
         Top             =   360
         Width           =   1000
      End
      Begin VB.Label Label9 
         Caption         =   "英文名称"
         Height          =   195
         Left            =   120
         TabIndex        =   80
         Top             =   1125
         Width           =   795
      End
      Begin VB.Label Label8 
         Caption         =   "厂商名称"
         Height          =   195
         Left            =   120
         TabIndex        =   79
         Top             =   758
         Width           =   795
      End
      Begin VB.Label Label7 
         Caption         =   "厂商编号"
         Height          =   195
         Left            =   120
         TabIndex        =   78
         Top             =   398
         Width           =   795
      End
   End
   Begin VB.CommandButton BTN_LAST 
      Caption         =   "最后一笔"
      Height          =   615
      Left            =   8040
      Picture         =   "FMBSUP.frx":0102
      Style           =   1  'Graphical
      TabIndex        =   71
      Top             =   3840
      Width           =   1695
   End
   Begin VB.CommandButton BTN_FIRST 
      Caption         =   "第一笔"
      Height          =   615
      Left            =   8040
      Picture         =   "FMBSUP.frx":0204
      Style           =   1  'Graphical
      TabIndex        =   70
      Top             =   1680
      Width           =   1695
   End
   Begin VB.CommandButton BTN_NEXT 
      Caption         =   "下一笔"
      Height          =   615
      Left            =   8040
      Picture         =   "FMBSUP.frx":0306
      Style           =   1  'Graphical
      TabIndex        =   69
      Top             =   3120
      Width           =   1695
   End
   Begin VB.CommandButton BTN_PRE 
      Caption         =   "上一笔"
      Height          =   615
      Left            =   8040
      Picture         =   "FMBSUP.frx":0408
      Style           =   1  'Graphical
      TabIndex        =   68
      Top             =   2400
      Width           =   1695
   End
   Begin VB.CommandButton BTN_DEL 
      Caption         =   "删除数据