📄 frmchax.frm
字号:
VERSION 5.00
Begin VB.Form frmchax
BackColor = &H00C0C0C0&
Caption = "中小学通用排课系统 PK1.0----------查 询--------设计：朱庆春 "
ClientHeight = 6795
ClientLeft = 15
ClientTop = 300
ClientWidth = 9480
ControlBox = 0 'False
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
LinkTopic = "Form1"
PaletteMode = 1 'UseZOrder
ScaleHeight = 6795
ScaleWidth = 9480
Begin VB.TextBox Text7
Height = 375
Left = 30
TabIndex = 102
Text = "Text7"
Top = 660
Visible = 0 'False
Width = 375
End
Begin VB.TextBox Text6
Height = 615
Left = 90
TabIndex = 98
Text = "Text6"
Top = 1110
Visible = 0 'False
Width = 330
End
Begin VB.TextBox Text5
Height = 375
Left = 0
TabIndex = 97
Text = "Text5"
Top = 900
Visible = 0 'False
Width = 210
End
Begin VB.TextBox Text4
Height = 495
Left = 0
TabIndex = 96
Text = "Text4"
Top = 2100
Visible = 0 'False
Width = 255
End
Begin VB.TextBox Text3
Height = 375
Left = 0
TabIndex = 95
Text = "Text3"
Top = 1500
Visible = 0 'False
Width = 255
End
Begin VB.CommandButton Command2
Caption = "打印本屏"
Height = 420
Left = 1050
TabIndex = 91
Top = 3045
Width = 1035
End
Begin VB.CommandButton Command1
Caption = "返 回"
Height = 420
Left = 30
TabIndex = 90
Top = 3045
Width = 945
End
Begin VB.ComboBox Combojs
BeginProperty Font
Name = "MS Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 750
Style = 2 'Dropdown List
TabIndex = 89
Top = 30
Width = 1335
End
Begin VB.ComboBox Combobj
BeginProperty Font
Name = "MS Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 360
Left = 750
Style = 2 'Dropdown List
TabIndex = 88
Top = 3495
Width = 1335
End
Begin VB.TextBox Text2
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00C00000&
Height = 2895
Left = 30
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 87
Top = 3900
Width = 2055
End
Begin VB.TextBox Text1
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000C0&
Height = 2565
Left = 30
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 86
Top = 450
Width = 2055
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 8
Visible = 0 'False
X1 = 7170
X2 = 7170
Y1 = 3450
Y2 = 5970
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 7
Visible = 0 'False
X1 = 6150
X2 = 6150
Y1 = 3660
Y2 = 6180
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 6
Visible = 0 'False
X1 = 5760
X2 = 5760
Y1 = 3630
Y2 = 6150
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 5
Visible = 0 'False
X1 = 4860
X2 = 4860
Y1 = 3540
Y2 = 6060
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 4
Visible = 0 'False
X1 = 4470
X2 = 4470
Y1 = 3510
Y2 = 6030
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 3
Visible = 0 'False
X1 = 3840
X2 = 3840
Y1 = 3600
Y2 = 6120
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 2
Visible = 0 'False
X1 = 3450
X2 = 3450
Y1 = 3570
Y2 = 6090
End
Begin VB.Line Lvjs
BorderWidth = 2
Index = 1
Visible = 0 'False
X1 = 2550
X2 = 2550
Y1 = 3480
Y2 = 6000
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 11
Visible = 0 'False
X1 = 2130
X2 = 8745
Y1 = 6360
Y2 = 6360
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 10
Visible = 0 'False
X1 = 2160
X2 = 8775
Y1 = 6570
Y2 = 6570
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 9
Visible = 0 'False
X1 = 2160
X2 = 8775
Y1 = 6270
Y2 = 6270
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 8
Visible = 0 'False
X1 = 2160
X2 = 8775
Y1 = 6000
Y2 = 6000
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 7
Visible = 0 'False
X1 = 2190
X2 = 8805
Y1 = 5670
Y2 = 5670
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 6
Visible = 0 'False
X1 = 2190
X2 = 8805
Y1 = 5370
Y2 = 5370
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 5
Visible = 0 'False
X1 = 2190
X2 = 8805
Y1 = 5040
Y2 = 5040
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 4
Visible = 0 'False
X1 = 2190
X2 = 8805
Y1 = 4710
Y2 = 4710
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 3
Visible = 0 'False
X1 = 2160
X2 = 8775
Y1 = 4380
Y2 = 4380
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 2
Visible = 0 'False
X1 = 2190
X2 = 8805
Y1 = 4080
Y2 = 4080
End
Begin VB.Line Lhjs
BorderWidth = 2
Index = 1
Visible = 0 'False
X1 = 2190
X2 = 8805
Y1 = 3750
Y2 = 3750
End
Begin VB.Label Label7
BackColor = &H00C0FFFF&
Caption = " 已排"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 139
Left = 6480
TabIndex = 187
Top = 5730
Visible = 0 'False
Width = 885
End
Begin VB.Label Label7
BackColor = &H00C0FFFF&
Caption = " 已排"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 138
Left = 5505
TabIndex = 186
Top = 5730
Visible = 0 'False
Width = 885
End
Begin VB.Label Label7
BackColor = &H00C0FFFF&
Caption = " 已排"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 137
Left = 4530
TabIndex = 185
Top = 5730
Visible = 0 'False
Width = 885
End
Begin VB.Label Label7
BackColor = &H00C0FFFF&
Caption = " 已排"
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 195
Index = 136
Left = 3555
TabIndex = 184
Top = 5730
Visible = 0 'False
Width = 885
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -