【VB开源代码栏目提醒】：网学会员VB开源代码为您提供TrainEdit.frm参考，解决您在TrainEdit.frm学习中工作中的难题，参考学习。
VERSION 5.00
Begin VB.Form TrainEdit
BorderStyle = 1 'Fixed Single
Caption = "编辑火车信息"
ClientHeight = 3525
ClientLeft = 45
ClientTop = 345
ClientWidth = 6255
Icon = "TrainEdit.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 3525
ScaleWidth = 6255
StartUpPosition = 2 '屏幕中心
Begin VB.Frame Frame1
Height = 2535
Left = 240
TabIndex = 11
Top = 120
Width = 5775
Begin VB.TextBox txtPriceYw
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 1320
MaxLength = 10
TabIndex = 7
Text = "0"
Top = 2040
Width = 1335
End
Begin VB.TextBox txtPriceRw
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 4320
MaxLength = 10
TabIndex = 8
Text = "0"
Top = 2040
Width = 1335
End
Begin VB.TextBox txtTno
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 1320
MaxLength = 50
TabIndex = 0
Top = 240
Width = 1335
End
Begin VB.TextBox txtSstation
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 1320
MaxLength = 50
TabIndex = 1
Top = 701
Width = 1335
End
Begin
VB.TextBox txtEstation
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 4320
MaxLength = 100
TabIndex = 2
Top = 701
Width = 1335
End
Begin VB.TextBox txtPriceYz
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 1320
MaxLength = 10
TabIndex = 5
Text = "0"
Top = 1586
Width = 1335
End
Begin VB.TextBox txtPriceRz
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 315
Left = 4320
MaxLength = 10
TabIndex = 6
Text = "0"
Top = 1586
Width = 1335
End
Begin VB.TextBox txtStime
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 1320
MaxLength = 200
TabIndex = 3
Top = 1132
Width = 1335
End
Begin VB.TextBox txtEtime
BeginProperty Font
Name = "Arial"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
Left = 4320
MaxLength = 20
TabIndex = 4
Top = 1132
Width = 1335
End
Begin VB.Label Label2
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "硬卧报价"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 180
Left = 240
TabIndex = 20
Top = 2100
Width = 720
End
Begin VB.Label Label1
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "软卧报价"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 180
Left = 3240
TabIndex = 19
Top = 2100
Width = 720
End
Begin VB.Label Label3
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "火车车次"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 180
Left = 240
TabIndex = 18
Top = 315
Width = 720
End
Begin VB.Label Label4
AutoS
相关文章
2013-9-1
