📄 frmshijuan.frm
字号:
Begin VB.ListBox LstZWT
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":0523
Left = 90
List = "FrmShiJuan.frx":0525
Sorted = -1 'True
TabIndex = 69
Top = 225
Width = 885
End
End
Begin VB.Frame Frame24
Height = 735
Left = 3090
TabIndex = 65
Top = 5715
Width = 1890
Begin VB.CommandButton CmdZWAdd
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 = 67
Top = 225
Width = 720
End
Begin VB.CommandButton CmdZWDel
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 = 66
Top = 225
Width = 720
End
End
Begin VB.Frame Frame23
Height = 6690
Left = 180
TabIndex = 61
Top = 165
Width = 1725
Begin VB.ListBox LstZW
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":0527
Left = 165
List = "FrmShiJuan.frx":0531
Sorted = -1 'True
TabIndex = 63
ToolTipText = "双击加入所选中的题目"
Top = 555
Width = 1380
End
Begin VB.ComboBox CmbZW
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":0545
Left = 600
List = "FrmShiJuan.frx":0555
Style = 2 'Dropdown List
TabIndex = 62
Top = 165
Width = 750
End
Begin VB.Label Label8
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 = 64
Top = 210
Width = 420
End
End
Begin VB.Frame Frame22
Height = 735
Left = 5070
TabIndex = 58
Top = 5715
Width = 4545
Begin VB.CommandButton CmdZWSJ
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 = 60
Top = 225
Width = 1395
End
Begin VB.CommandButton CmdZWOld
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 = 59
Top = 225
Width = 1920
End
End
End
Begin VB.Frame FraXZ
BackColor = &H00FFFFC0&
Caption = "试卷生成--选择题选择"
ForeColor = &H00FF0000&
Height = 6960
Left = 180
TabIndex = 0
Top = 360
Width = 11475
Begin VB.Frame Frame8
BackColor = &H00FFFF80&
Height = 735
Left = 5070
TabIndex = 17
Top = 5715
Width = 4545
Begin VB.CommandButton CmdOldTest
BackColor = &H008080FF&
Caption = "从旧试卷生成"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 4440
TabIndex = 19
Top = 240
Visible = 0 'False
Width = 1920
End
Begin VB.CommandButton CmdSJ
BackColor = &H008080FF&
Caption = "随机生成"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Left = 1200
TabIndex = 18
Top = 240
Width = 2235
End
End
Begin VB.Frame Frame6
BackColor = &H00FFFF80&
Height = 735
Left = 3090
TabIndex = 8
Top = 5715
Width = 1890
Begin VB.CommandButton CmdDel
BackColor = &H008080FF&
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 = 10
Top = 225
Width = 720
End
Begin VB.CommandButton CmdAdd
BackColor = &H008080FF&
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 = 9
Top = 225
Width = 720
End
End
Begin VB.Frame Frame4
BackColor = &H00FFFF80&
Caption = "所选题目"
Height = 5160
Left = 2940
TabIndex = 2
Top = 180
Width = 1965
Begin VB.ListBox LstTMD
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 = 4590
ItemData = "FrmShiJuan.frx":056B
Left = 1035
List = "FrmShiJuan.frx":056D
Sorted = -1 'True
TabIndex = 5
Top = 435
Width = 885
End
Begin VB.ListBox LstTM
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 = 4590
ItemData = "FrmShiJuan.frx":056F
Left = 120
List = "FrmShiJuan.frx":0571
Sorted = -1 'True
TabIndex = 3
Top = 450
Width = 885
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "多选题："
ForeColor = &H00FF0000&
Height = 180
Left = 1035
TabIndex = 7
Top = 225
Width = 765
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "单选题："
ForeColor = &H00FF0000&
Height = 180
Left = 165
TabIndex = 6
Top = 225
Width = 765
End
End
Begin VB.Frame Frame2
BackColor = &H00FFFF80&
Caption = "题目预览"
Height = 5160
Left = 5160
TabIndex = 1
Top = 165
Width = 5970
Begin RichTextLib.RichTextBox TXTView
Height = 4830
Left = 60
TabIndex = 4
Top = 270
Width = 5835
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -