📄 frmverify.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Object = "{3B7C8863-D78F-101B-B9B5-04021C009402}#1.2#0"; "RICHTX32.OCX"
Object = "{5C4592BE-A01B-11D3-AFAF-BF3F431B043C}#1.0#0"; "Toolbar2.ocx"
Begin VB.Form frmItemVerify
Caption = "试题审核"
ClientHeight = 8430
ClientLeft = 60
ClientTop = 450
ClientWidth = 10890
LinkTopic = "Form1"
MDIChild = -1 'True
ScaleHeight = 8430
ScaleWidth = 10890
WindowState = 2 'Maximized
Begin AIFCmp1.asxToolbar myToolbar
Height = 615
Left = 360
Top = 7680
Width = 9915
_ExtentX = 17489
_ExtentY = 1085
BeginProperty ToolTipFont {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ButtonGap = 10
BorderStyle = 0
DoubleBottomBorder= -1 'True
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ButtonCount = 9
BoldOnChecked = -1 'True
ButtonCaption1 = "前一题"
ButtonKey1 = "previous"
ButtonPicture1 = "frmVerify.frx":0000
ButtonPictureOver1= "frmVerify.frx":0C52
ButtonToolTipText1= "Previous"
ButtonCaption2 = "后一题"
ButtonKey2 = "next"
ButtonPicture2 = "frmVerify.frx":18A4
ButtonPictureOver2= "frmVerify.frx":24F6
ButtonToolTipText2= "Next"
ButtonCaption3 = "新增试题"
ButtonKey3 = "new"
ButtonPicture3 = "frmVerify.frx":3148
ButtonToolTipText3= "New"
ButtonVisible3 = 0 'False
ButtonCaption4 = "审核通过"
ButtonKey4 = "verify"
ButtonPicture4 = "frmVerify.frx":3D9A
ButtonToolTipText4= "Verify"
ButtonCaption5 = "编辑试题"
ButtonKey5 = "edit"
ButtonPicture5 = "frmVerify.frx":49EC
ButtonPictureOver5= "frmVerify.frx":563E
ButtonToolTipText5= "edit"
ButtonCaption6 = "删除试题"
ButtonKey6 = "delete"
ButtonPicture6 = "frmVerify.frx":6290
ButtonToolTipText6= "Delete"
ButtonCaption7 = "关闭"
ButtonKey7 = "close"
ButtonPicture7 = "frmVerify.frx":6EE2
ButtonToolTipText7= "Close"
ButtonCaption8 = "保存更改"
ButtonKey8 = "save"
ButtonPicture8 = "frmVerify.frx":7B34
ButtonPictureOver8= "frmVerify.frx":8786
ButtonToolTipText8= "Save"
ButtonCaption9 = "取消更改"
ButtonKey9 = "cancel"
ButtonPicture9 = "frmVerify.frx":93D8
ButtonPictureOver9= "frmVerify.frx":A02A
ButtonToolTipText9= "cancel"
End
Begin VB.PictureBox picItemArgs
Height = 7095
Left = 120
ScaleHeight = 7035
ScaleWidth = 4155
TabIndex = 12
TabStop = 0 'False
Top = 240
Width = 4215
Begin VB.TextBox txtSerial
Height = 270
Left = 1680
MaxLength = 4
TabIndex = 0
Top = 360
Width = 2055
End
Begin VB.Frame frmMark
Height = 1935
Left = 240
TabIndex = 23
Top = 5280
Width = 3735
Begin VB.CheckBox checkValidity
Caption = "Check1"
Height = 255
Left = 1440
TabIndex = 14
Top = 1320
Value = 1 'Checked
Width = 255
End
Begin VB.TextBox txtMark
Height = 270
Left = 1440
MaxLength = 2
TabIndex = 7
Top = 360
Width = 2055
End
Begin VB.TextBox txtDuration
Height = 270
Left = 1440
MaxLength = 2
TabIndex = 8
Top = 840
Width = 2055
End
Begin VB.Label lMark
AutoSize = -1 'True
Caption = "mark"
Height = 180
Left = 240
TabIndex = 26
Tag = "3009"
Top = 360
Width = 360
End
Begin VB.Label lDuration
AutoSize = -1 'True
Caption = "duration"
Height = 180
Left = 240
TabIndex = 25
Tag = "3010"
Top = 840
Width = 720
End
Begin VB.Label lValidity
AutoSize = -1 'True
Caption = "validity"
Height = 180
Left = 240
TabIndex = 24
Tag = "3011"
Top = 1320
Width = 720
End
End
Begin VB.Frame frmType
Height = 1935
Left = 240
TabIndex = 19
Top = 3120
Width = 3735
Begin VB.ComboBox CombList
Height = 300
Index = 0
Left = 1440
Style = 2 'Dropdown List
TabIndex = 4
Top = 360
Width = 2055
End
Begin VB.ComboBox CombList
Height = 300
Index = 2
Left = 1440
Style = 2 'Dropdown List
TabIndex = 6
Top = 1320
Width = 2055
End
Begin VB.ComboBox CombList
Height = 300
Index = 1
Left = 1440
Style = 2 'Dropdown List
TabIndex = 5
Top = 840
Width = 2055
End
Begin VB.Label lType
AutoSize = -1 'True
Caption = "题 型"
Height = 180
Left = 240
TabIndex = 22
Top = 360
Width = 720
End
Begin VB.Label lLevel
AutoSize = -1 'True
Caption = "难 度"
Height = 180
Left = 240
TabIndex = 21
Top = 840
Width = 720
End
Begin VB.Label lTarget
AutoSize = -1 'True
Caption = "目标层次"
Height = 180
Left = 240
TabIndex = 20
Top = 1320
Width = 720
End
End
Begin VB.Frame frmCategory
Height = 2175
Left = 240
TabIndex = 15
Top = 720
Width = 3735
Begin VB.ComboBox combPoint
Height = 300
Left = 1440
Style = 2 'Dropdown List
TabIndex = 3
Top = 1440
Width = 2055
End
Begin VB.ComboBox combCourse
Height = 300
Left = 1440
Style = 2 'Dropdown List
TabIndex = 2
Top = 960
Width = 2055
End
Begin VB.ComboBox combField
Height = 300
Left = 1440
Style = 2 'Dropdown List
TabIndex = 1
Top = 480
Width = 2055
End
Begin VB.Label lField
AutoSize = -1 'True
Caption = "科 目"
Height = 180
Left = 240
TabIndex = 18
Top = 480
Width = 720
End
Begin VB.Label lCourse
AutoSize = -1 'True
Caption = "课 程"
Height = 180
Left = 240
TabIndex = 17
Top = 960
Width = 720
End
Begin VB.Label lPoint
AutoSize = -1 'True
Caption = "知 识 点"
Height = 180
Left = 240
TabIndex = 16
Top = 1440
Width = 720
End
End
Begin VB.Label lSerial
AutoSize = -1 'True
Caption = "试题编号"
Height = 180
Left = 480
TabIndex = 29
Top = 360
Width = 720
End
End
Begin VB.PictureBox picItemContent
Height = 6135
Left = 4440
ScaleHeight = 6075
ScaleWidth = 5475
TabIndex = 11
TabStop = 0 'False
Top = 240
Width = 5535
Begin MSComctlLib.ImageList imlToolbarIcons
Left = 3480
Top = 720
_ExtentX = 1005
_ExtentY = 1005
BackColor = -2147483643
ImageWidth = 16
ImageHeight = 16
MaskColor = 12632256
_Version = 393216
BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628}
NumListImages = 13
BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":AC7C
Key = "New"
EndProperty
BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":AD8E
Key = "Open"
EndProperty
BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":AEA0
Key = "Save"
EndProperty
BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":AFB2
Key = "Print"
EndProperty
BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B0C4
Key = "Cut"
EndProperty
BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B1D6
Key = "Copy"
EndProperty
BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B2E8
Key = "Paste"
EndProperty
BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B3FA
Key = "Bold"
EndProperty
BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B50C
Key = "Italic"
EndProperty
BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B61E
Key = "Underline"
EndProperty
BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B730
Key = "Align Left"
EndProperty
BeginProperty ListImage12 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B842
Key = "Center"
EndProperty
BeginProperty ListImage13 {2C247F27-8591-11D1-B16A-00C0F0283628}
Picture = "frmVerify.frx":B954
Key = "Align Right"
EndProperty
EndProperty
End
Begin MSComctlLib.Toolbar tbToolBar
Height = 390
Left = 0
TabIndex = 13
Top = 0
Width = 8310
_ExtentX = 14658
_ExtentY = 688
ButtonWidth = 609
ButtonHeight = 582
Appearance = 1
ImageList = "imlToolbarIcons"
_Version = 393216
BeginProperty Buttons {66833FE8-8583-11D1-B16A-00C0F0283628}
NumButtons = 11
BeginProperty Button1 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "剪切"
Object.ToolTipText = "1040"
ImageKey = "Cut"
EndProperty
BeginProperty Button2 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "复制"
Object.ToolTipText = "1041"
ImageKey = "Copy"
EndProperty
BeginProperty Button3 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "粘贴"
Object.ToolTipText = "1042"
ImageKey = "Paste"
EndProperty
BeginProperty Button4 {66833FEA-8583-11D1-B16A-00C0F0283628}
Style = 3
EndProperty
BeginProperty Button5 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "粗体"
Object.ToolTipText = "1043"
ImageKey = "Bold"
EndProperty
BeginProperty Button6 {66833FEA-8583-11D1-B16A-00C0F0283628}
Key = "斜体"
Object.ToolTipText = "1044"
ImageKey = "Italic"
EndProperty
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -