form1.frm
来自「股票交易买卖批量下单保存」· FRM 代码 · 共 1,262 行 · 第 1/3 页
FRM
1,262 行
VERSION 5.00
Begin VB.Form Form1
Caption = "Form1"
ClientHeight = 3375
ClientLeft = 2055
ClientTop = 1605
ClientWidth = 6870
LinkTopic = "Form1"
ScaleHeight = 3375
ScaleWidth = 6870
Begin VB.TextBox Text44
Alignment = 2 'Center
BackColor = &H00C0FFFF&
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 270
Left = 3240
TabIndex = 23
Text = "0"
Top = 120
Width = 1575
End
Begin VB.TextBox Text43
Alignment = 2 'Center
BackColor = &H00C0FFFF&
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF00FF&
Height = 270
Left = 840
TabIndex = 21
Text = "100000"
Top = 120
Width = 1575
End
Begin VB.ComboBox Combo5
Height = 300
ItemData = "Form1.frx":0000
Left = 4320
List = "Form1.frx":000A
TabIndex = 19
Text = "买"
Top = 2920
Width = 615
End
Begin VB.ComboBox Combo4
Height = 300
ItemData = "Form1.frx":0016
Left = 4320
List = "Form1.frx":0020
TabIndex = 18
Text = "买"
Top = 2440
Width = 615
End
Begin VB.ComboBox Combo3
Height = 300
ItemData = "Form1.frx":002C
Left = 4320
List = "Form1.frx":0036
TabIndex = 17
Text = "买"
Top = 1960
Width = 615
End
Begin VB.ComboBox Combo2
Height = 300
ItemData = "Form1.frx":0042
Left = 4320
List = "Form1.frx":004C
TabIndex = 16
Text = "买"
Top = 1480
Width = 615
End
Begin VB.ComboBox Combo1
Height = 300
ItemData = "Form1.frx":0058
Left = 4320
List = "Form1.frx":0062
TabIndex = 15
Text = "买"
Top = 1000
Width = 615
End
Begin VB.CommandButton Command5
Caption = "下单"
Height = 300
Left = 6120
TabIndex = 14
Top = 2910
Width = 615
End
Begin VB.CommandButton Command4
Caption = "下单"
Height = 300
Left = 6120
TabIndex = 13
Top = 2430
Width = 615
End
Begin VB.CommandButton Command3
Caption = "下单"
Height = 300
Left = 6120
TabIndex = 12
Top = 1950
Width = 615
End
Begin VB.CommandButton Command2
Caption = "下单"
Height = 300
Left = 6120
TabIndex = 11
Top = 1470
Width = 615
End
Begin VB.CommandButton Command1
Caption = "下单"
Height = 300
Left = 6120
TabIndex = 10
Top = 990
Width = 615
End
Begin VB.TextBox Text42
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4320
TabIndex = 9
Text = "Text42"
ToolTipText = "输入下单数量"
Top = 2880
Width = 2415
End
Begin VB.TextBox Text36
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
TabIndex = 8
ToolTipText = "输入证券代码"
Top = 2880
Width = 855
End
Begin VB.TextBox Text35
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4320
TabIndex = 7
Text = "Text35"
ToolTipText = "输入下单数量"
Top = 2400
Width = 2415
End
Begin VB.TextBox Text29
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
TabIndex = 6
ToolTipText = "输入证券代码"
Top = 2400
Width = 855
End
Begin VB.TextBox Text28
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4320
TabIndex = 5
Text = "Text28"
ToolTipText = "输入下单数量"
Top = 1920
Width = 2415
End
Begin VB.TextBox Text22
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
TabIndex = 4
ToolTipText = "输入证券代码"
Top = 1920
Width = 855
End
Begin VB.TextBox Text21
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4320
TabIndex = 3
Text = "Text21"
ToolTipText = "输入下单数量"
Top = 1440
Width = 2415
End
Begin VB.TextBox Text15
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
TabIndex = 2
ToolTipText = "输入证券代码"
Top = 1440
Width = 855
End
Begin VB.TextBox Text14
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4320
TabIndex = 1
Text = "Text14"
ToolTipText = "输入下单数量"
Top = 960
Width = 2415
End
Begin VB.TextBox Text8
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 120
TabIndex = 0
ToolTipText = "输入证券代码"
Top = 960
Width = 855
End
Begin VB.Label Label34
Alignment = 2 'Center
BackColor = &H00C0FFFF&
BorderStyle = 1 'Fixed Single
Caption = "操 作"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 225
Left = 4320
TabIndex = 55
Top = 550
Width = 2415
End
Begin VB.Label Label33
Alignment = 2 'Center
BackColor = &H00C0FFFF&
BorderStyle = 1 'Fixed Single
Caption = "成本价"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF00FF&
Height = 225
Left = 3480
TabIndex = 54
Top = 550
Width = 855
End
Begin VB.Label Label32
Alignment = 2 'Center
BackColor = &H00C0FFFF&
BorderStyle = 1 'Fixed Single
Caption = "持有量"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 225
Left = 2760
TabIndex = 53
Top = 550
Width = 765
End
Begin VB.Label Label31
Alignment = 2 'Center
BackColor = &H00C0FFFF&
BorderStyle = 1 'Fixed Single
Caption = "日涨幅"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF00FF&
Height = 225
Left = 2160
TabIndex = 52
Top = 550
Width = 645
End
Begin VB.Label Label30
Alignment = 2 'Center
BackColor = &H00C0FFFF&
BorderStyle = 1 'Fixed Single
Caption = "最新价"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?