📄 frmshijuan.frm
字号:
Begin VB.CommandButton CmdTKOld
Caption = "从旧试卷生成"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 2445
TabIndex = 25
Top = 225
Width = 1920
End
End
End
Begin VB.Frame FraWD
Caption = "试卷生成--问答题选择"
ForeColor = &H00FF0000&
Height = 6960
Left = 3720
TabIndex = 40
Top = 8280
Visible = 0 'False
Width = 11475
Begin VB.Frame Frame21
Height = 735
Left = 5070
TabIndex = 54
Top = 5715
Width = 4545
Begin VB.CommandButton CmdWDOld
Caption = "从旧试卷生成"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 2445
TabIndex = 56
Top = 225
Width = 1920
End
Begin VB.CommandButton CmdWDSJ
Caption = "随机生成"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 870
TabIndex = 55
Top = 225
Width = 1395
End
End
Begin VB.Frame Frame20
Height = 6690
Left = 180
TabIndex = 50
Top = 165
Width = 1725
Begin VB.ComboBox CmbWD
BackColor = &H00E8F4F8&
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
ItemData = "FrmShiJuan.frx":0267
Left = 600
List = "FrmShiJuan.frx":0277
Style = 2 'Dropdown List
TabIndex = 52
Top = 165
Width = 750
End
Begin VB.ListBox LstWD
Appearance = 0 'Flat
BackColor = &H00E8F4F8&
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 6030
ItemData = "FrmShiJuan.frx":028D
Left = 165
List = "FrmShiJuan.frx":0297
Sorted = -1 'True
TabIndex = 51
ToolTipText = "双击加入所选中的题目"
Top = 555
Width = 1380
End
Begin VB.Label Label7
AutoSize = -1 'True
Caption = "难度"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 210
Left = 75
TabIndex = 53
Top = 210
Width = 420
End
End
Begin VB.Frame Frame19
Height = 735
Left = 3090
TabIndex = 47
Top = 5715
Width = 1890
Begin VB.CommandButton CmdWDDel
Caption = "移除"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 390
Left = 990
TabIndex = 49
Top = 225
Width = 720
End
Begin VB.CommandButton CmdWDAdd
Caption = "添加"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 390
Left = 150
TabIndex = 48
Top = 225
Width = 720
End
End
Begin VB.Frame Frame18
Caption = "所选题目"
Height = 5160
Left = 1965
TabIndex = 45
Top = 165
Width = 1035
Begin VB.ListBox LstWDT
Appearance = 0 'Flat
BackColor = &H00E8F4F8&
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 4830
ItemData = "FrmShiJuan.frx":02AB
Left = 90
List = "FrmShiJuan.frx":02AD
Sorted = -1 'True
TabIndex = 46
Top = 225
Width = 885
End
End
Begin VB.Frame Frame17
Caption = "题目预览"
Height = 5160
Left = 3060
TabIndex = 43
Top = 165
Width = 4590
Begin RichTextLib.RichTextBox RTBWDT
Height = 4830
Left = 60
TabIndex = 44
Top = 270
Width = 4455
_ExtentX = 7858
_ExtentY = 8520
_Version = 393217
BackColor = 15267064
Enabled = -1 'True
ReadOnly = -1 'True
ScrollBars = 2
Appearance = 0
TextRTF = $"FrmShiJuan.frx":02AF
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
End
Begin VB.Frame Frame16
Caption = "评分标准"
Height = 5160
Left = 7695
TabIndex = 41
Top = 165
Width = 3705
Begin RichTextLib.RichTextBox RTBWDD
Height = 4830
Left = 60
TabIndex = 42
Top = 270
Width = 3570
_ExtentX = 6297
_ExtentY = 8520
_Version = 393217
BackColor = 15267064
Enabled = -1 'True
ReadOnly = -1 'True
ScrollBars = 2
Appearance = 0
TextRTF = $"FrmShiJuan.frx":034C
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
End
End
Begin VB.Frame FraZW
Caption = "试卷生成--作文题选择"
ForeColor = &H00FF0000&
Height = 6960
Left = 4680
TabIndex = 57
Top = 8400
Visible = 0 'False
Width = 11475
Begin VB.Frame Frame27
Caption = "评分标准"
Height = 5160
Left = 7695
TabIndex = 72
Top = 165
Width = 3705
Begin RichTextLib.RichTextBox RTBZWD
Height = 4830
Left = 60
TabIndex = 73
Top = 270
Width = 3570
_ExtentX = 6297
_ExtentY = 8520
_Version = 393217
BackColor = 15267064
Enabled = -1 'True
ReadOnly = -1 'True
ScrollBars = 2
Appearance = 0
TextRTF = $"FrmShiJuan.frx":03E9
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
End
Begin VB.Frame Frame26
Caption = "题目预览"
Height = 5160
Left = 3060
TabIndex = 70
Top = 165
Width = 4590
Begin RichTextLib.RichTextBox RTBZWT
Height = 4830
Left = 60
TabIndex = 71
Top = 270
Width = 4455
_ExtentX = 7858
_ExtentY = 8520
_Version = 393217
BackColor = 15267064
Enabled = -1 'True
ReadOnly = -1 'True
ScrollBars = 2
Appearance = 0
TextRTF = $"FrmShiJuan.frx":0486
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
End
Begin VB.Frame Frame25
Caption = "所选题目"
Height = 5160
Left = 1965
TabIndex = 68
Top = 165
Width = 1035
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -