📄 frmclassman.frm
字号:
VERSION 5.00
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Begin VB.Form FrmclassMan
BackColor = &H80000004&
BorderStyle = 3 'Fixed Dialog
Caption = " 课 程 管 理"
ClientHeight = 6465
ClientLeft = 45
ClientTop = 330
ClientWidth = 9255
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6465
ScaleWidth = 9255
ShowInTaskbar = 0 'False
StartUpPosition = 2 '屏幕中心
Begin VB.Frame Frameq
Height = 2655
Left = 360
TabIndex = 17
Top = 3600
Width = 8535
Begin VB.Frame Frame3
Caption = "所选课程章节信息"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 2415
Left = 120
TabIndex = 19
Top = 120
Width = 2535
Begin VB.ListBox List1
Columns = 1
Height = 2025
IntegralHeight = 0 'False
Left = 120
TabIndex = 20
Top = 240
Width = 2295
End
End
Begin VB.TextBox zhangDes
BackColor = &H80000004&
Height = 1815
Left = 2760
Locked = -1 'True
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 18
Top = 720
Width = 5655
End
Begin VB.Label Label6
Caption = "章节名："
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 2760
TabIndex = 23
Top = 240
Width = 855
End
Begin VB.Label zhangName
Caption = "zhangName"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 3720
TabIndex = 22
Top = 240
Width = 4095
End
Begin VB.Label Label4
Caption = "描 述："
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 2760
TabIndex = 21
Top = 480
Width = 1215
End
End
Begin VB.Frame Frame5
BackColor = &H80000004&
Caption = " 章 节 管 理 "
Height = 735
Left = 360
TabIndex = 13
Top = 2880
Width = 6855
Begin VB.CommandButton Cmd_Del2
BackColor = &H00FFFFFF&
Caption = "删除章节"
BeginProperty Font
Name = "华文彩云"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4800
TabIndex = 16
Top = 240
Width = 1215
End
Begin VB.CommandButton Cmd_Modi2
BackColor = &H00FFFFFF&
Caption = "修改章节"
BeginProperty Font
Name = "华文彩云"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 2640
TabIndex = 15
Top = 240
Width = 1215
End
Begin VB.CommandButton Cmd_Add2
BackColor = &H00FFFFFF&
Caption = "添加章节"
BeginProperty Font
Name = "华文彩云"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 720
TabIndex = 14
Top = 240
Width = 1215
End
End
Begin VB.CommandButton Cmd_Cancel
Caption = "返 回"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 7560
TabIndex = 0
Top = 2760
Width = 1215
End
Begin VB.Frame Frame4
Caption = " 课 程 管 理 "
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 735
Left = 360
TabIndex = 7
Top = 2160
Width = 6855
Begin VB.CommandButton Cmd_Add
Caption = "添加课程"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 720
TabIndex = 10
Top = 240
Width = 1215
End
Begin VB.CommandButton Cmd_Modi
Caption = "修改课程"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 2640
TabIndex = 9
Top = 240
Width = 1215
End
Begin VB.CommandButton Cmd_Del
Caption = "删除课程"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 4800
TabIndex = 8
Top = 240
Width = 1215
End
End
Begin VB.Frame Frame1
Height = 2175
Left = 360
TabIndex = 1
Top = 0
Width = 8535
Begin VB.TextBox TxtClassDes
BackColor = &H80000004&
Height = 1335
Left = 2280
Locked = -1 'True
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 5
Top = 720
Width = 6135
End
Begin VB.Frame Frame2
Caption = "课程信息"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1935
Left = 120
TabIndex = 2
Top = 120
Width = 2055
Begin MSDataListLib.DataList DataList1
Bindings = "FrmclassMan.frx":0000
DataField = "ClassName"
DataSource = "Adodc1"
Height = 1530
Left = 120
TabIndex = 3
Top = 240
Width = 1815
_ExtentX = 3201
_ExtentY = 2699
_Version = 393216
ListField = "ClassName"
End
End
Begin VB.Label Label2
Caption = "描 述："
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -