📄 fbdnew.frm
字号:
VERSION 5.00
Object = "{F394EC4A-1D3C-4C1F-9CF3-D2AD6DE35C68}#1.0#0"; "vbalDtab6x.ocx"
Object = "{AAFC76DD-CA60-4286-B6D9-3F60CB53A409}#1.0#0"; "data.ocx"
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Begin VB.Form FbdNew
BorderStyle = 0 'None
Caption = "保单管理"
ClientHeight = 9765
ClientLeft = 0
ClientTop = 0
ClientWidth = 14865
LinkTopic = "Form1"
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
ScaleHeight = 9765
ScaleWidth = 14865
ShowInTaskbar = 0 'False
Begin VB.PictureBox ismsg
Appearance = 0 'Flat
BackColor = &H00FEDDC9&
ForeColor = &H80000008&
Height = 10095
Left = 600
ScaleHeight = 10065
ScaleWidth = 12345
TabIndex = 20
Top = 960
Width = 12375
Begin VB.VScrollBar VScroll1
Height = 5800
LargeChange = 5800
Left = 11760
Max = 0
TabIndex = 21
TabStop = 0 'False
Top = 0
Width = 255
End
Begin VB.PictureBox Picture1
AutoRedraw = -1 'True
AutoSize = -1 'True
BackColor = &H00FFDFCE&
Height = 9615
Left = 0
ScaleHeight = 9555
ScaleWidth = 11715
TabIndex = 22
Top = 0
Width = 11775
Begin VB.Frame Frame5
BackColor = &H00FFDFCE&
Caption = "备注"
BeginProperty Font
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 975
Left = 0
TabIndex = 159
Top = 8520
Width = 9975
Begin VB.TextBox Tbz
Appearance = 0 'Flat
Height = 615
Left = 120
TabIndex = 160
Top = 240
Width = 9735
End
End
Begin VB.Frame Frame4
BackColor = &H00FFDFCE&
Caption = "特别约定"
BeginProperty Font
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 975
Left = 0
TabIndex = 157
Top = 7440
Width = 9975
Begin VB.TextBox Tyd
Appearance = 0 'Flat
Height = 615
Left = 120
TabIndex = 158
Top = 240
Width = 9735
End
End
Begin VB.Frame Frame2
BackColor = &H00FFDFCE&
Caption = "基本险"
BeginProperty Font
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 735
Left = 0
TabIndex = 146
Top = 3960
Width = 11655
Begin VB.TextBox b2
Appearance = 0 'Flat
Height = 315
Left = 10200
TabIndex = 150
Text = "0"
Top = 240
Width = 855
End
Begin VB.TextBox b1
Appearance = 0 'Flat
Height = 315
Left = 4455
TabIndex = 149
Text = "0"
Top = 240
Width = 855
End
Begin VB.TextBox a1
Appearance = 0 'Flat
Height = 315
Left = 2400
TabIndex = 148
Text = "0"
Top = 240
Width = 855
End
Begin 保险秘书.OsenXPComboBox a2
Height = 315
Left = 8520
TabIndex = 147
Top = 240
Width = 855
_ExtentX = 1508
_ExtentY = 556
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin VB.Label Label27
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "万 保费"
Height = 195
Index = 20
Left = 9480
TabIndex = 156
Top = 360
Width = 675
End
Begin VB.Label Label25
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "第三者综合责任险： 保额"
Height = 195
Index = 4
Left = 6180
TabIndex = 155
Top = 360
Width = 2295
End
Begin VB.Label Label27
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "万 保费"
Height = 195
Index = 0
Left = 3360
TabIndex = 154
Top = 360
Width = 945
End
Begin VB.Label Label25
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "车辆损失险： 保额"
Height = 195
Index = 0
Left = 300
TabIndex = 153
Top = 360
Width = 2025
End
Begin VB.Label Label55
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "元"
Height = 195
Left = 5400
TabIndex = 152
Top = 360
Width = 180
End
Begin VB.Label Label56
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "元"
Height = 195
Left = 11160
TabIndex = 151
Top = 360
Width = 180
End
End
Begin VB.Frame Frame7
BackColor = &H00FFDFCE&
Caption = "车辆信息"
BeginProperty Font
Name = "宋体"
Size = 11.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1455
Left = 0
TabIndex = 116
Top = 2400
Width = 11655
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 5
Left = 4440
TabIndex = 125
Top = 600
Width = 1215
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 3
Left = 9960
TabIndex = 124
Top = 240
Width = 1335
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 2
Left = 7320
TabIndex = 123
Top = 240
Width = 1335
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 1
Left = 4440
TabIndex = 122
Top = 240
Width = 1455
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 0
Left = 1440
TabIndex = 121
Top = 240
Width = 1695
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 4
Left = 1440
TabIndex = 120
Top = 600
Width = 1455
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 7
Left = 8160
TabIndex = 119
Top = 600
Width = 495
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 6
Left = 7320
TabIndex = 118
Top = 600
Width = 495
End
Begin VB.TextBox Tcar
Appearance = 0 'Flat
Height = 315
Index = 8
Left = 1440
TabIndex = 117
Top = 960
Width = 1695
End
Begin 保险秘书.OsenXPComboBox Obl
Height = 315
Left = 7320
TabIndex = 126
Top = 960
Width = 1335
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -