📄 查询内容.frm
字号:
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 11
Left = 7380
TabIndex = 47
Top = 3870
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "婴儿费"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 12
Left = 1650
TabIndex = 46
Top = 4470
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "放疗费"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 13
Left = 4365
TabIndex = 45
Top = 4515
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "理疗费"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 14
Left = 7380
TabIndex = 44
Top = 4470
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "镜检费"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 15
Left = 1650
TabIndex = 43
Top = 5070
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "病理费"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 16
Left = 4365
TabIndex = 42
Top = 5115
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "电诊费"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 17
Left = 7380
TabIndex = 41
Top = 5070
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "其 它"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 18
Left = 1635
TabIndex = 40
Top = 5625
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "预交金"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 19
Left = 1725
TabIndex = 39
Top = 1380
Width = 1020
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "使用费用"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 20
Left = 4395
TabIndex = 38
Top = 1395
Width = 1215
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "剩余费用"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 330
Index = 21
Left = 7155
TabIndex = 37
Top = 1395
Width = 1260
End
End
Begin VB.PictureBox picYJJ
Height = 8580
Left = 6330
ScaleHeight = 8520
ScaleWidth = 11850
TabIndex = 1
Top = 1230
Visible = 0 'False
Width = 11910
Begin MSDBGrid.DBGrid gridYJJ
Bindings = "查询内容.frx":5A015
Height = 5055
Left = -30
OleObjectBlob = "查询内容.frx":5A025
TabIndex = 8
Top = 1110
Width = 11865
End
Begin VB.TextBox yjjtext
BackColor = &H00C0E0FF&
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000C0&
Height = 405
Left = 2535
TabIndex = 4
Top = 6345
Width = 1665
End
Begin VB.TextBox Text2
BackColor = &H00C0E0FF&
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000C0&
Height = 405
Left = 5325
TabIndex = 3
Top = 6345
Width = 1620
End
Begin VB.TextBox Text3
BackColor = &H00C0E0FF&
BeginProperty Font
Name = "System"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000C0&
Height = 405
Left = 8160
TabIndex = 2
Top = 6345
Width = 1680
End
Begin VB.Data Data3
Caption = "Data3"
Connect = "odbc;uid=zwj;pwd=qqq;database=net207"
DatabaseName = "207his"
DefaultCursorType= 0 'DefaultCursor
DefaultType = 1 'UseODBC
Exclusive = 0 'False
Height = 435
Left = 1530
Options = 0
ReadOnly = 0 'False
RecordsetType = 2 'Snapshot
RecordSource = ""
Top = 555
Visible = 0 'False
Width = 2505
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "现 金"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 375
Index = 1
Left = 1605
TabIndex = 7
Top = 6420
Width = 1335
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "支 票"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 375
Index = 2
Left = 4455
TabIndex = 6
Top = 6420
Width = 1335
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "总合计"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 375
Index = 3
Left = 7170
TabIndex = 5
Top = 6420
Width = 1335
End
End
Begin VB.PictureBox picYP
Height ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -