相关代码 |
|
VERSION 5.00
Object = "{F856EC8B-F03C-4515-BDC6-64CBD617566A}#6.0#0"; "fpSpr60.ocx"
Begin VB.Form FrmST60
Caption = "Form1"
ClientHeight = 8040
ClientLeft = 60
ClientTop = 345
ClientWidth = 10620
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
LinkTopic = "Form1"
ScaleHeight = 11115
ScaleWidth = 15240
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton Command7
Height = 1380
Left = 10350
Picture = "FrmST10.frx":0000
Style = 1 'Graphical
TabIndex = 25
Top = 9120
Width = 5055
End
Begin VB.CommandButton Command5
BackColor = &H00000080&
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1380
Left = 5175
Picture = "FrmST10.frx":0DF3
Style = 1 'Graphical
TabIndex = 24
Top = 9120
Width = 5175
End
Begin VB.CommandButton BtnReset
BackColor = &H00000080&
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1380
Left = 0
Picture = "FrmST10.frx":20B1
Style = 1 'Graphical
TabIndex = 1
Top = 9120
Width = 5175
End
Begin VB.PictureBox Picture1
AutoSize = -1 'True
CausesValidation= 0 'False
FillColor = &H00000080&
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H8000000A&
Height = 10545
Left = 0
Picture = "FrmST10.frx":30DC
ScaleHeight = 10485
ScaleWidth = 15330
TabIndex = 0
Top = 0
Width = 15390
Begin VB.Frame Frame3
Caption = "当天生产情况查询"
Height = 7965
Left = 4320
TabIndex = 14
Top = 1080
Width = 10785
Begin VB.Frame Frame4
Caption = "查询条件"
Height = 1005
Left = 90
TabIndex = 15
Top = 240
Width = 10485
Begin VB.TextBox Text2
Height = 315
Left = 1800
TabIndex = 20
Text = "Text2"
Top = 300
Width = 3045
End
Begin VB.TextBox Text3
Height = 315
Left = 6000
TabIndex = 19
Text = "Text2"
Top = 270
Width = 3045
End
Begin VB.CommandButton Command6
Caption = "查询"
Height = 375
Left = 9180
TabIndex = 18
Top = 270
Width = 1185
End
Begin VB.CheckBox Check1
Caption = "G"
Height = 345
Left = 150
TabIndex = 17
Top = 630
Width = 765
End
Begin VB.CheckBox Check2
Caption = "NG"
Height = 285
Left = 1140
TabIndex = 16
Top = 660
Width = 885
End
Begin VB.Label Label8
Caption = "气体发生器条码"
Height = 255
Left = 90
TabIndex = 22
Top = 330
Width = 1695
End
Begin VB.Label Label7
Caption = "气袋发生器条码"
Height = 255
Left = 4650
TabIndex = 21
Top = 300
Width = 1455
End
End
Begin FPSpreadADO.fpSpread fpSpread2
Height = 6435
Left = 60
TabIndex = 23
Top = 1350
Width = 10545
_Version = 393216
_ExtentX = 18600
_ExtentY = 11351
_StockProps = 64
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
MaxCols = 502
SpreadDesigner = "FrmST10.frx":198B8
End
End
Begin VB.Frame Frame2
Caption = "该产品的工艺参数"
Height = 7965
Left = 4320
TabIndex = 12
Top = 1080
Width = 4005
Begin FPSpreadADO.fpSpread fpSpread1
Height = 7365
Left = 120
TabIndex = 13
Top = 420
Width = 3675
_Version = 393216
_ExtentX = 6482
_ExtentY = 12991
_StockProps = 64
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
MaxCols = 501
SpreadDesigner = "FrmST10.frx":1DE78
End
End
Begin VB.CommandButton Command3
BackColor = &H000000FF&
Caption = "PLC连线状况"
Height = 975
Left = 720
Picture = "FrmST10.frx":2254F
Style = 1 'Graphical
TabIndex = 11
Top = 6120
Width = 3375
End
Begin VB.CommandButton Command4
BackColor = &H80000010&
Caption = "Bolt 检 测"
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 720
MaskColor = &H00FF80FF&
Style = 1 'Graphical
TabIndex = 10
Top = 4470
Width = 3375
End
Begin VB.CommandButton Command2
BackColor = &H80000010&
Caption = "空气压力不够"
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 720
MaskColor = &H00FF80FF&
Style = 1 'Graphical
TabIndex = 9
Top = 3855
Width = 3375
End
Begin VB.CommandButton Command1
BackColor = &H80000010&
Caption = "紧 急 停 止"
BeginProperty Font
Name = "楷体_GB2312"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 720
MaskColor = &H00FF80FF&
Style = 1 'Graphical
TabIndex = 8
Top = 3240
Width = 3375
End
Begin VB.Label Label6
BackStyle = 0 'Transparent
Caption = "123456"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 3120
TabIndex = 7
Top = 2640
Width = 3855
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "BOLT # 批号:"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 720
TabIndex = 6
Top = 2640
Width = 2535
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "123456"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 3120
TabIndex = 5
Top = 2160
Width = 3855
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "INFLATOR 条码:"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 615
Left = 720
TabIndex = 4
Top = 2160
Width = 2535
End
Begin VB.Label Label2
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "提示信息"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 720
TabIndex = 3
Top = 1680
Width = 7335
End
Begin VB.Label Label1
BackColor = &H00000000&
Caption = "Riveting"
BeginProperty Font
Name = "宋体"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H8000000B&
Height = 495
Left = 720
TabIndex = 2
Top = 1080
Width = 3495
End
End
End
Attribute VB_Name = "FrmST60"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
相关资源 |
|