📄 frmshbb4.frm
字号:
VERSION 5.00
Object = "{90F3D7B3-92E7-44BA-B444-6A8E2A3BC375}#1.0#0"; "ACTSKIN4.OCX"
Object = "{A8561640-E93C-11D3-AC3B-CE6078F7B616}#1.0#0"; "VSPRINT7.OCX"
Object = "{D76D7130-4A96-11D3-BD95-D296DC2DD072}#1.0#0"; "VSFLEX7D.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form FRMSHBB4
Caption = "三项之和高级报表"
ClientHeight = 8205
ClientLeft = 60
ClientTop = 450
ClientWidth = 10650
Icon = "FRMSHBB4.frx":0000
LinkTopic = "Form1"
MinButton = 0 'False
ScaleHeight = 8205
ScaleWidth = 10650
StartUpPosition = 2 '屏幕中心
WindowState = 2 'Maximized
Begin VB.Timer Timer1
Interval = 1
Left = 2280
Top = 6930
End
Begin VB.TextBox Text22
Height = 525
Left = 10980
TabIndex = 19
Text = "Text2"
Top = 8760
Visible = 0 'False
Width = 1245
End
Begin VB.TextBox Text33
Height = 525
Left = 11070
TabIndex = 18
Text = "Text3"
Top = 9420
Visible = 0 'False
Width = 1245
End
Begin VB.TextBox Text44
Height = 525
Left = 11010
TabIndex = 17
Text = "Text4"
Top = 10050
Visible = 0 'False
Width = 1245
End
Begin VB.Data Data1
Caption = "Data1"
Connect = "Access 2000;"
DatabaseName = ""
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = 9000
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = ""
Top = 1470
Visible = 0 'False
Width = 1185
End
Begin ACTIVESKINLibCtl.Skin Skin1
Left = 7830
OleObjectBlob = "FRMSHBB4.frx":08CA
Top = 6630
End
Begin MSComDlg.CommonDialog CommonDialog2
Left = 6450
Top = 1380
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VSPrinter7LibCtl.VSPrinter VP
Height = 4350
Left = 4770
TabIndex = 0
Top = 2310
Visible = 0 'False
Width = 5040
_cx = 8890
_cy = 7673
Appearance = 1
BorderStyle = 0
Enabled = -1 'True
MousePointer = 0
BackColor = -2147483643
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 5.25
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
BeginProperty HdrFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_ConvInfo = 1
AutoRTF = -1 'True
Preview = -1 'True
DefaultDevice = 0 'False
PhysicalPage = -1 'True
AbortWindow = -1 'True
AbortWindowPos = 0
AbortCaption = "NHB软件工作室"
AbortTextButton = "取消"
AbortTextDevice = "正在 %s on %s"
AbortTextPage = "进行打印%d "
FileName = ""
MarginLeft = 1440
MarginTop = 1440
MarginRight = 1440
MarginBottom = 1440
MarginHeader = 0
MarginFooter = 0
IndentLeft = 0
IndentRight = 0
IndentFirst = 0
IndentTab = 720
SpaceBefore = 0
SpaceAfter = 0
LineSpacing = 100
Columns = 1
ColumnSpacing = 180
ShowGuides = 2
LargeChangeHorz = 300
LargeChangeVert = 300
SmallChangeHorz = 30
SmallChangeVert = 30
Track = 0 'False
ProportionalBars= -1 'True
Zoom = 25.3189401373896
ZoomMode = 3
ZoomMax = 400
ZoomMin = 10
ZoomStep = 25
EmptyColor = 0
TextColor = 0
HdrColor = 12582912
BrushColor = 16711680
BrushStyle = 0
PenColor = 0
PenStyle = 0
PenWidth = 0
PageBorder = 0
Header = ""
Footer = ""
TableSep = "|;"
TableBorder = 7
TablePen = 0
TablePenLR = 0
TablePenTB = 0
NavBar = 0
NavBarColor = -2147483633
ExportFormat = 0
URL = ""
Navigation = 3
NavBarMenuText = "Whole &Page|Page &Width|&Two Pages|Thumb&nail"
End
Begin MSComDlg.CommonDialog CommonDialog1
Left = 7320
Top = 1440
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin MSComctlLib.Toolbar Toolbar2
Height = 22590
Left = 30
TabIndex = 11
Top = 30
Width = 1785
_ExtentX = 3149
_ExtentY = 39846
ButtonWidth = 609
ButtonHeight = 39740
Appearance = 1
_Version = 393216
Begin VB.CommandButton Command3
Caption = "全部科目"
Height = 465
Left = 240
TabIndex = 37
ToolTipText = "显示所有科目三项之和报表"
Top = 1380
Width = 1245
End
Begin VB.Frame Frame1
Caption = "显示选择栏"
Height = 5535
Left = 120
TabIndex = 20
Top = 1980
Width = 1515
Begin VB.CheckBox Check1
Caption = "三项之和"
Height = 255
Index = 15
Left = 270
TabIndex = 36
Top = 5100
Width = 1095
End
Begin VB.CheckBox Check1
Caption = "不及格率"
Height = 255
Index = 14
Left = 270
TabIndex = 35
Top = 4770
Width = 1155
End
Begin VB.CheckBox Check1
Caption = "不及格数"
Height = 255
Index = 13
Left = 270
TabIndex = 34
Top = 4470
Width = 1035
End
Begin VB.CheckBox Check1
Caption = "及格率"
Height = 255
Index = 12
Left = 270
TabIndex = 33
Top = 4170
Width = 1095
End
Begin VB.CheckBox Check1
Caption = "及格数"
Height = 255
Index = 11
Left = 270
TabIndex = 32
Top = 3870
Width = 1005
End
Begin VB.CheckBox Check1
Caption = "良好率"
Height = 255
Index = 10
Left = 270
TabIndex = 31
Top = 3570
Width = 1005
End
Begin VB.CheckBox Check1
Caption = "良好数"
Height = 255
Index = 9
Left = 270
TabIndex = 30
Top = 3270
Width = 1005
End
Begin VB.CheckBox Check1
Caption = "优秀率"
Height = 225
Index = 8
Left = 270
TabIndex = 29
Top = 2940
Width = 1005
End
Begin VB.CheckBox Check1
Caption = "优秀数"
Height = 255
Index = 7
Left = 270
TabIndex = 28
Top = 2580
Width = 1005
End
Begin VB.CheckBox Check1
Caption = "合计总分"
Height = 255
Index = 6
Left = 270
TabIndex = 27
Top = 2250
Width = 1155
End
Begin VB.CheckBox Check1
Caption = "均分差"
Height = 255
Index = 5
Left = 270
TabIndex = 26
Top = 1920
Width = 1005
End
Begin VB.CheckBox Check1
Caption = "平均分"
Height = 255
Index = 4
Left = 270
TabIndex = 25
Top = 1590
Width = 1005
End
Begin VB.CheckBox Check1
Caption = "最低分"
Height = 255
Index = 3
Left = 270
TabIndex = 24
Top = 1260
Width = 1005
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -