frmscale.frm

电子皮带秤选型工具

VERSION 5.00
Begin VB.Form Form1 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "皮带秤传感器选型计算"
   ClientHeight    =   6810
   ClientLeft      =   45
   ClientTop       =   435
   ClientWidth     =   9105
   Icon            =   "Frmscale.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   6810
   ScaleWidth      =   9105
   ShowInTaskbar   =   0   'False
   StartUpPosition =   2  '屏幕中心
   Begin VB.Frame Frame5 
      Caption         =   "结果"
      Height          =   5985
      Left            =   5265
      TabIndex        =   23
      Top             =   165
      Width           =   3510
      Begin VB.CommandButton Command1 
         Caption         =   "计算"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   690
         Index           =   0
         Left            =   675
         TabIndex        =   27
         Top             =   4665
         Width           =   2205
      End
      Begin VB.Label Label1 
         Caption         =   "每米重量："
         Height          =   345
         Index           =   8
         Left            =   510
         TabIndex        =   42
         Top             =   1785
         Width           =   945
      End
      Begin VB.Label Label2 
         Caption         =   "Kg/m"
         Height          =   255
         Index           =   7
         Left            =   2625
         TabIndex        =   41
         Top             =   1800
         Width           =   480
      End
      Begin VB.Label Label3 
         Caption         =   "0.0"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   360
         Index           =   2
         Left            =   1680
         TabIndex        =   40
         Top             =   1740
         Width           =   825
      End
      Begin VB.Label Label3 
         Caption         =   "0.0"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   360
         Index           =   1
         Left            =   1680
         TabIndex        =   31
         Top             =   1290
         Width           =   825
      End
      Begin VB.Label Label2 
         Caption         =   "只"
         Height          =   255
         Index           =   6
         Left            =   2655
         TabIndex        =   30
         Top             =   1320
         Width           =   480
      End
      Begin VB.Label Label1 
         Caption         =   "传感数量："
         Height          =   345
         Index           =   6
         Left            =   495
         TabIndex        =   29
         Top             =   1275
         Width           =   945
      End
      Begin VB.Label Label3 
         Caption         =   "0.0"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   360
         Index           =   0
         Left            =   1680
         TabIndex        =   26
         Top             =   750
         Width           =   825
      End
      Begin VB.Label Label2 
         Caption         =   "Kg"
         Height          =   255
         Index           =   5
         Left            =   2700
         TabIndex        =   25
         Top             =   780
         Width           =   480
      End
      Begin VB.Label Label1 
         Caption         =   "单只传感重量："
         Height          =   345
         Index           =   5
         Left            =   195
         TabIndex        =   24
         Top             =   765
         Width           =   1305
      End
   End
   Begin VB.Frame Frame1 
      Caption         =   "参数"
      Height          =   6015
      Left            =   240
      TabIndex        =   0
      Top             =   135
      Width           =   4770
      Begin VB.Frame Frame4 
         Caption         =   "过载系数"
         Height          =   1275
         Left            =   135
         TabIndex        =   19
         Top             =   4335
         Width           =   4410
         Begin VB.TextBox Text3 
            Height          =   360
            Left            =   3570
            TabIndex        =   32
            Text            =   "1"
            Top             =   495
            Width           =   645
         End
         Begin VB.TextBox Text2 
            Height          =   330
            Left            =   1230
            TabIndex        =   22
            Text            =   "1.0"
            Top             =   495
            Width           =   690
         End
         Begin VB.Label Label1 
            Caption         =   "传感器数量："
            Height          =   345
            Index           =   7
            Left            =   2355
            TabIndex        =   33
            Top             =   570
            Width           =   1125
         End
         Begin VB.Label Label2 
            Height          =   255
            Index           =   4
            Left            =   2670
            TabIndex        =   21
            Top             =   585
            Width           =   870
         End
         Begin VB.Label Label1 
            Caption         =   "安全系数："
            Height          =   345
            Index           =   4
            Left            =   210
            TabIndex        =   20
            Top             =   555
            Width           =   915
         End
      End
      Begin VB.Frame Frame3 
         Caption         =   "输送机参数"
         Height          =   2250
         Left            =   165
         TabIndex        =   6
         Top             =   1965
         Width           =   4410
         Begin VB.TextBox Text1 
            Height          =   345
            Index           =   3
            Left            =   1350
            TabIndex        =   16
            Text            =   "1"
            Top             =   1755
            Width           =   1200
         End
         Begin VB.TextBox Text1 
            Height          =   345
            Index           =   2
            Left            =   1365
            TabIndex        =   13
            Text            =   "1"
            Top             =   1260
            Width           =   1200
         End
         Begin VB.TextBox Text1 
            Height          =   345
            Index           =   1
            Left            =   1365
            TabIndex        =   10
            Text            =   "1.0"
            Top             =   750
            Width           =   1200
         End
         Begin VB.TextBox Text1 
            Height          =   345
            Index           =   0
            Left            =   1350
            TabIndex        =   7
            Text            =   "100"
            Top             =   270
            Width           =   1200
         End
         Begin VB.Label Label2 
            Caption         =   "m(米)"
            Height          =   255
            Index           =   3
            Left            =   2760
            TabIndex        =   18
            Top             =   1770
            Width           =   870
         End
         Begin VB.Label Label1 
            Caption         =   "称重区域："
            Height          =   345
            Index           =   3
            Left            =   240
            TabIndex        =   17
            Top             =   1800
            Width           =   960
         End
         Begin VB.Label Label2 
            Caption         =   "m(米)"
            Height          =   255
            Index           =   2
            Left            =   2790
            TabIndex        =   15
            Top             =   1290
            Width           =   870
         End
         Begin VB.Label Label1 
            Caption         =   "托棍间距："
            Height          =   345
            Index           =   2
            Left            =   210
            TabIndex        =   14
            Top             =   1275
            Width           =   960
         End
         Begin VB.Label Label2 
            Caption         =   "m/s"
            Height          =   255
            Index           =   1
            Left            =   2805
            TabIndex        =   12
            Top             =   780
            Width           =   870
         End
         Begin VB.Label Label1 
            Caption         =   "正常带速："
            Height          =   345
            Index           =   1
            Left            =   210