📄 form10.frm
字号:
VERSION 5.00
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Begin VB.Form Form10
BorderStyle = 1 'Fixed Single
Caption = "省二建股权证管理系统V1.0-交易信息录入框"
ClientHeight = 6960
ClientLeft = 45
ClientTop = 435
ClientWidth = 8520
Icon = "Form10.frx":0000
LinkTopic = "Form10"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6960
ScaleWidth = 8520
StartUpPosition = 3 '窗口缺省
Begin VB.CommandButton Command10
Caption = "修改当前信息交易"
Height = 855
Left = 1680
MaskColor = &H00000000&
Picture = "Form10.frx":08CA
Style = 1 'Graphical
TabIndex = 30
Top = 0
UseMaskColor = -1 'True
Width = 855
End
Begin VB.TextBox Text10
Height = 270
Left = 3600
TabIndex = 29
Text = "Text10"
Top = 1920
Visible = 0 'False
Width = 1215
End
Begin MSFlexGridLib.MSFlexGrid MSFlexGrid1
Bindings = "Form10.frx":2D0C
Height = 5175
Left = -120
TabIndex = 28
Top = 1800
Width = 8655
_ExtentX = 15266
_ExtentY = 9128
_Version = 393216
WordWrap = -1 'True
FillStyle = 1
MergeCells = 1
AllowUserResizing= 3
FormatString = ""
End
Begin VB.CommandButton Command9
Caption = "查看交易"
Height = 855
Left = 5160
MaskColor = &H00000000&
Picture = "Form10.frx":2D20
Style = 1 'Graphical
TabIndex = 26
Top = 0
UseMaskColor = -1 'True
Width = 855
End
Begin VB.CommandButton Command8
Caption = "退出系统"
Height = 855
Left = 7680
MaskColor = &H00000000&
Picture = "Form10.frx":5162
Style = 1 'Graphical
TabIndex = 25
Top = 0
UseMaskColor = -1 'True
Width = 855
End
Begin VB.CommandButton Command7
Caption = "凭证打印"
Height = 855
Left = 6840
MaskColor = &H00808080&
Picture = "Form10.frx":61A4
Style = 1 'Graphical
TabIndex = 24
Top = 0
UseMaskColor = -1 'True
Width = 855
End
Begin VB.CommandButton Command6
Caption = "交易打印"
Height = 855
Left = 6000
Picture = "Form10.frx":7CE6
Style = 1 'Graphical
TabIndex = 23
Top = 0
Width = 855
End
Begin VB.PictureBox Picture2
AutoSize = -1 'True
Height = 300
Left = 3840
ScaleHeight = 240
ScaleWidth = 1155
TabIndex = 20
Top = 1080
Width = 1215
Begin VB.Label text4
AutoSize = -1 'True
Caption = "text4"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 0
TabIndex = 22
Top = 0
Width = 525
End
End
Begin VB.PictureBox Picture1
AutoSize = -1 'True
Height = 300
Left = 5640
ScaleHeight = 240
ScaleWidth = 1875
TabIndex = 19
Top = 1080
Width = 1935
Begin VB.Label text5
AutoSize = -1 'True
Caption = "text5"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 0
TabIndex = 21
Top = 0
Width = 525
End
End
Begin VB.TextBox Text9
Height = 375
Left = 1800
TabIndex = 18
Top = 2520
Visible = 0 'False
Width = 1215
End
Begin VB.TextBox Text8
Height = 270
Left = 360
TabIndex = 17
Top = 2520
Visible = 0 'False
Width = 1215
End
Begin VB.Data Data1
Caption = "Data1"
Connect = "Access 2000;"
DatabaseName = ""
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = 5760
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = ""
Top = 1440
Visible = 0 'False
Width = 1215
End
Begin VB.CommandButton Command5
Caption = "删除交易"
Height = 855
Left = 2520
MaskColor = &H00000000&
Picture = "Form10.frx":85B0
Style = 1 'Graphical
TabIndex = 16
Top = 0
UseMaskColor = -1 'True
Width = 855
End
Begin VB.CommandButton Command4
Caption = "下翻查开交易"
Height = 855
Left = 4200
Picture = "Form10.frx":A9F2
Style = 1 'Graphical
TabIndex = 15
Top = 0
Width = 975
End
Begin VB.CommandButton Command3
Caption = "上翻查开交易"
Height = 855
Left = 3360
Picture = "Form10.frx":B0DC
Style = 1 'Graphical
TabIndex = 14
Top = 0
Width = 855
End
Begin VB.CommandButton Command2
Caption = "保存交易"
Height = 855
Left = 840
MaskColor = &H00000000&
Picture = "Form10.frx":B7C6
Style = 1 'Graphical
TabIndex = 13
Top = 0
UseMaskColor = -1 'True
Width = 855
End
Begin VB.CommandButton Command1
Caption = "添加交易"
Height = 855
Left = 0
MaskColor = &H00000000&
Picture = "Form10.frx":C808
Style = 1 'Graphical
TabIndex = 12
Top = 0
UseMaskColor = -1 'True
Width = 855
End
Begin VB.TextBox Text7
BackColor = &H8000000F&
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 4320
TabIndex = 11
Text = "Text7"
Top = 1440
Width = 1215
End
Begin VB.TextBox Text6
BackColor = &H8000000F&
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 2640
TabIndex = 10
Text = "Text6"
Top = 1440
Width = 1095
End
Begin VB.TextBox Text3
BackColor = &H8000000F&
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
Left = 2160
TabIndex = 9
Text = "Text3"
Top = 1080
Width = 1095
End
Begin VB.TextBox Text2
BackColor = &H8000000F&
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -