frm_scsgl.frm

采购管理系统使用vb6.0 加sql2000数据库 编程

      Begin VB.TextBox Text1 
         Height          =   300
         Left            =   1080
         Locked          =   -1  'True
         TabIndex        =   1
         Top             =   240
         Width           =   1455
      End
      Begin VB.TextBox Text2 
         Height          =   300
         Left            =   3240
         TabIndex        =   2
         Top             =   240
         Width           =   2055
      End
      Begin VB.TextBox Text3 
         Height          =   300
         Left            =   1080
         TabIndex        =   7
         Top             =   960
         Width           =   1455
      End
      Begin VB.TextBox Text4 
         Height          =   300
         Left            =   3240
         TabIndex        =   5
         Top             =   600
         Width           =   2055
      End
      Begin VB.TextBox Text5 
         Height          =   300
         Left            =   1080
         TabIndex        =   4
         Top             =   600
         Width           =   1455
      End
      Begin VB.TextBox Text6 
         Height          =   300
         Left            =   5880
         TabIndex        =   9
         Top             =   960
         Width           =   1815
      End
      Begin VB.TextBox Text7 
         Height          =   300
         Left            =   1080
         TabIndex        =   10
         Top             =   1320
         Width           =   1575
      End
      Begin VB.TextBox Text8 
         Height          =   300
         Left            =   5880
         TabIndex        =   3
         Top             =   240
         Width           =   1815
      End
      Begin VB.TextBox Text9 
         Height          =   300
         Left            =   5880
         TabIndex        =   6
         Top             =   600
         Width           =   1815
      End
      Begin VB.Label Label13 
         Caption         =   "信誉评价"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   120
         TabIndex        =   42
         Top             =   1680
         Width           =   1095
      End
      Begin VB.Label Label12 
         Caption         =   "生产内容"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2880
         TabIndex        =   41
         Top             =   1320
         Width           =   735
      End
      Begin VB.Label Label11 
         BackStyle       =   0  'Transparent
         Caption         =   "国家"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2640
         TabIndex        =   33
         Top             =   1080
         Width           =   615
      End
      Begin VB.Label Label1 
         BackStyle       =   0  'Transparent
         Caption         =   "生产商编号"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   120
         TabIndex        =   32
         Top             =   360
         Width           =   1095
      End
      Begin VB.Label Label2 
         BackStyle       =   0  'Transparent
         Caption         =   "名称"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2640
         TabIndex        =   31
         Top             =   360
         Width           =   615
      End
      Begin VB.Label Label3 
         BackStyle       =   0  'Transparent
         Caption         =   "简称"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   5400
         TabIndex        =   30
         Top             =   360
         Width           =   735
      End
      Begin VB.Label Label4 
         BackStyle       =   0  'Transparent
         Caption         =   "E-mail"
         ForeColor       =   &H00C00000&
         Height          =   255
         Left            =   2640
         TabIndex        =   29
         Top             =   720
         Width           =   615
      End
      Begin VB.Label Label5 
         BackStyle       =   0  'Transparent
         Caption         =   "电话"
         ForeColor       =   &H00C00000&
         Height          =   375
         Left            =   5400
         TabIndex        =   28
         Top             =   720
         Width           =   735
      End
      Begin VB.Label Label6 
         BackStyle       =   0  'Transparent
         Caption         =   "联系人"
         ForeColor       =   &H00C00000&
         Height          =   195
         Left            =   360
         TabIndex        =   27
         Top             =   960
         Width           =   615
      End
      Begin VB.Label Label7 
         BackStyle       =   0  'Transparent
         Caption         =   "联系人电话"
         ForeColor       =   &H00C00000&
         Height          =   195
         Left            =   120
         TabIndex        =   26
         Top             =   1320
         Width           =   1095
      End
      Begin VB.Label Label8 
         BackStyle       =   0  'Transparent
         Caption         =   "传真"
         ForeColor       =   &H00C00000&
         Height          =   225
         Left            =   480
         TabIndex        =   25
         Top             =   600
         Width           =   495
      End
      Begin VB.Label Label9 
         BackStyle       =   0  'Transparent
         Caption         =   "地址"
         ForeColor       =   &H00C00000&
         Height          =   195
         Left            =   5400
         TabIndex        =   24
         Top             =   1060
         Width           =   735
      End
   End
   Begin VB.Frame Frame1 
      Height          =   615
      Left            =   0
      TabIndex        =   35
      Top             =   0
      Width           =   7815
      Begin VB.CommandButton Cmd_add 
         Caption         =   "增加"
         Height          =   350
         Left            =   120
         TabIndex        =   14
         Top             =   240
         Width           =   855
      End
      Begin VB.CommandButton Cmd_del 
         Caption         =   "删除"
         Height          =   350
         Left            =   1080
         TabIndex        =   15
         Top             =   240
         Width           =   855
      End
      Begin VB.CommandButton Cmd_edit 
         Caption         =   "修改"
         Height          =   350
         Left            =   2040
         TabIndex        =   16
         Top             =   240
         Width           =   855
      End
      Begin VB.CommandButton Cmd_cancel 
         Caption         =   "取消"
         Height          =   350
         Left            =   3960
         TabIndex        =   40
         Top             =   240
         Width           =   855
      End
      Begin VB.CommandButton Cmd_exit 
         Caption         =   "关闭"
         Height          =   350
         Left            =   6840
         TabIndex        =   38
         Top             =   240
         Width           =   855
      End
      Begin VB.CommandButton Cmd_save 
         Caption         =   "保存"
         Enabled         =   0   'False
         Height          =   350
         Left            =   3000
         TabIndex        =   37
         Top             =   240
         Width           =   855
      End
      Begin VB.CommandButton Cmd_refurbish 
         Caption         =   "刷新"
         Height          =   350
         Left            =   4920
         TabIndex        =   36
         Top             =   240
         Width           =   855
      End
      Begin VB.CommandButton Cmd_query 
         Caption         =   "查询"
         Height          =   350
         Left            =   5880
         TabIndex        =   39
         Top             =   240
         Width           =   855
      End
   End
   Begin VB.Frame Frame3 
      Height          =   615
      Left            =   0
      TabIndex        =   0
      Top             =   0
      Width           =   7935
      Begin VB.ComboBox Combo1 
         Height          =   300
         ItemData        =   "frm_scsgl.frx":0038
         Left            =   1080
         List            =   "frm_scsgl.frx":004B
         Style           =   2  'Dropdown List
         TabIndex        =   21
         Top             =   240
         Width           =   1695
      End
      Begin VB.ComboBox Combo2 
         Height          =   300
         ItemData        =   "frm_scsgl.frx":007B
         Left            =   2880
         List            =   "frm_scsgl.frx":0091
         Style           =   2  'Dropdown List
         TabIndex        =   20
         Top             =   240
         Width           =   975
      End
      Begin VB.TextBox Text10 
         Height          =   300
         Left            =   3960
         TabIndex        =   19
         Top             =   240
         Width           =   1575
      End
      Begin VB.CommandButton Command1 
         Caption         =   "确定"
         Height          =   350
         Left            =   5880
         TabIndex        =   18
         Top             =   200
         Width           =   855
      End
      Begin VB.CommandButton Command2 
         Caption         =   "取消"
         Height          =   350
         Left            =   6840
         TabIndex        =   17
         Top             =   200
         Width           =   855
      End
      Begin VB.Label Label10 
         Caption         =   "查询条件"
         ForeColor       =   &H00808000&
         Height          =   195
         Left            =   120
         TabIndex        =   22
         Top             =   320
         Width           =   975
      End
   End
End
Attribute VB_Name = "frm_scsgl"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False