📄 frmprodbyman.vb
字号:
'
Me.cmd_qobj.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.cmd_qobj.Location = New System.Drawing.Point(162, 280)
Me.cmd_qobj.Name = "cmd_qobj"
Me.cmd_qobj.Size = New System.Drawing.Size(58, 24)
Me.cmd_qobj.TabIndex = 28
Me.cmd_qobj.Text = "查 找"
'
'Panel2
'
Me.Panel2.Controls.Add(Me.Panel3)
Me.Panel2.Controls.Add(Me.GroupBox1)
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel2.Location = New System.Drawing.Point(279, 0)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(467, 671)
Me.Panel2.TabIndex = 22
'
'Panel3
'
Me.Panel3.Controls.Add(Me.Prb_ok)
Me.Panel3.Controls.Add(Me.Panel4)
Me.Panel3.Controls.Add(Me.Splitter2)
Me.Panel3.Controls.Add(Me.GroupBox5)
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel3.Location = New System.Drawing.Point(0, 232)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(467, 439)
Me.Panel3.TabIndex = 2
'
'Prb_ok
'
Me.Prb_ok.Location = New System.Drawing.Point(0, 216)
Me.Prb_ok.Name = "Prb_ok"
Me.Prb_ok.Size = New System.Drawing.Size(464, 8)
Me.Prb_ok.TabIndex = 28
Me.Prb_ok.Visible = False
'
'Panel4
'
Me.Panel4.Controls.Add(Me.GroupBox7)
Me.Panel4.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel4.Location = New System.Drawing.Point(0, 231)
Me.Panel4.Name = "Panel4"
Me.Panel4.Size = New System.Drawing.Size(467, 208)
Me.Panel4.TabIndex = 2
'
'GroupBox7
'
Me.GroupBox7.Controls.Add(Me.rtb_result)
Me.GroupBox7.Controls.Add(Me.artbtest)
Me.GroupBox7.Dock = System.Windows.Forms.DockStyle.Fill
Me.GroupBox7.Location = New System.Drawing.Point(0, 0)
Me.GroupBox7.Name = "GroupBox7"
Me.GroupBox7.Size = New System.Drawing.Size(467, 208)
Me.GroupBox7.TabIndex = 3
Me.GroupBox7.TabStop = False
Me.GroupBox7.Text = "试题答案"
'
'rtb_result
'
Me.rtb_result.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.rtb_result.ContainingControl = Me
Me.rtb_result.Location = New System.Drawing.Point(8, 16)
Me.rtb_result.Name = "rtb_result"
Me.rtb_result.OcxState = CType(resources.GetObject("rtb_result.OcxState"), System.Windows.Forms.AxHost.State)
Me.rtb_result.Size = New System.Drawing.Size(456, 192)
Me.rtb_result.TabIndex = 4
'
'artbtest
'
Me.artbtest.AutoWordSelection = True
Me.artbtest.Enabled = False
Me.artbtest.Font = New System.Drawing.Font("宋体", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.artbtest.Location = New System.Drawing.Point(8, 128)
Me.artbtest.Name = "artbtest"
Me.artbtest.Size = New System.Drawing.Size(456, 16)
Me.artbtest.TabIndex = 3
Me.artbtest.Text = ""
Me.artbtest.WordWrap = False
'
'Splitter2
'
Me.Splitter2.BackColor = System.Drawing.Color.Green
Me.Splitter2.Dock = System.Windows.Forms.DockStyle.Top
Me.Splitter2.Location = New System.Drawing.Point(0, 224)
Me.Splitter2.Name = "Splitter2"
Me.Splitter2.Size = New System.Drawing.Size(467, 7)
Me.Splitter2.TabIndex = 1
Me.Splitter2.TabStop = False
'
'GroupBox5
'
Me.GroupBox5.Controls.Add(Me.rtb_context)
Me.GroupBox5.Controls.Add(Me.artbtestall)
Me.GroupBox5.Dock = System.Windows.Forms.DockStyle.Top
Me.GroupBox5.Location = New System.Drawing.Point(0, 0)
Me.GroupBox5.Name = "GroupBox5"
Me.GroupBox5.Size = New System.Drawing.Size(467, 224)
Me.GroupBox5.TabIndex = 0
Me.GroupBox5.TabStop = False
Me.GroupBox5.Text = "试题内容"
'
'rtb_context
'
Me.rtb_context.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.rtb_context.ContainingControl = Me
Me.rtb_context.Location = New System.Drawing.Point(8, 24)
Me.rtb_context.Name = "rtb_context"
Me.rtb_context.OcxState = CType(resources.GetObject("rtb_context.OcxState"), System.Windows.Forms.AxHost.State)
Me.rtb_context.Size = New System.Drawing.Size(456, 192)
Me.rtb_context.TabIndex = 0
'
'artbtestall
'
Me.artbtestall.ContainingControl = Me
Me.artbtestall.Location = New System.Drawing.Point(8, 56)
Me.artbtestall.Name = "artbtestall"
Me.artbtestall.OcxState = CType(resources.GetObject("artbtestall.OcxState"), System.Windows.Forms.AxHost.State)
Me.artbtestall.Size = New System.Drawing.Size(40, 96)
Me.artbtestall.TabIndex = 1
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.GroupBox4)
Me.GroupBox1.Controls.Add(Me.GroupBox3)
Me.GroupBox1.Dock = System.Windows.Forms.DockStyle.Top
Me.GroupBox1.Location = New System.Drawing.Point(0, 0)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(467, 232)
Me.GroupBox1.TabIndex = 0
Me.GroupBox1.TabStop = False
'
'GroupBox4
'
Me.GroupBox4.Controls.Add(Me.lbl_objname)
Me.GroupBox4.Controls.Add(Me.Label14)
Me.GroupBox4.Controls.Add(Me.txt_score)
Me.GroupBox4.Controls.Add(Me.txt_resultidx)
Me.GroupBox4.Controls.Add(Me.txt_objtype)
Me.GroupBox4.Controls.Add(Me.txt_chapter)
Me.GroupBox4.Controls.Add(Me.txt_subject)
Me.GroupBox4.Controls.Add(Me.Label13)
Me.GroupBox4.Controls.Add(Me.lbl_opname)
Me.GroupBox4.Controls.Add(Me.Label8)
Me.GroupBox4.Controls.Add(Me.Label9)
Me.GroupBox4.Controls.Add(Me.Label10)
Me.GroupBox4.Controls.Add(Me.Label11)
Me.GroupBox4.Controls.Add(Me.Label12)
Me.GroupBox4.Location = New System.Drawing.Point(3, 112)
Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(464, 112)
Me.GroupBox4.TabIndex = 1
Me.GroupBox4.TabStop = False
Me.GroupBox4.Text = "试题信息"
'
'lbl_objname
'
Me.lbl_objname.Location = New System.Drawing.Point(248, 82)
Me.lbl_objname.Name = "lbl_objname"
Me.lbl_objname.Size = New System.Drawing.Size(96, 16)
Me.lbl_objname.TabIndex = 27
'
'Label14
'
Me.Label14.Location = New System.Drawing.Point(177, 83)
Me.Label14.Name = "Label14"
Me.Label14.Size = New System.Drawing.Size(71, 16)
Me.Label14.TabIndex = 26
Me.Label14.Text = "试题名称："
'
'txt_score
'
Me.txt_score.Location = New System.Drawing.Point(360, 43)
Me.txt_score.MaxLength = 50
Me.txt_score.Name = "txt_score"
Me.txt_score.Size = New System.Drawing.Size(96, 21)
Me.txt_score.TabIndex = 25
Me.txt_score.Text = ""
'
'txt_resultidx
'
Me.txt_resultidx.Enabled = False
Me.txt_resultidx.Location = New System.Drawing.Point(256, 45)
Me.txt_resultidx.MaxLength = 50
Me.txt_resultidx.Name = "txt_resultidx"
Me.txt_resultidx.Size = New System.Drawing.Size(48, 21)
Me.txt_resultidx.TabIndex = 24
Me.txt_resultidx.Text = ""
'
'txt_objtype
'
Me.txt_objtype.Enabled = False
Me.txt_objtype.Location = New System.Drawing.Point(56, 47)
Me.txt_objtype.MaxLength = 50
Me.txt_objtype.Name = "txt_objtype"
Me.txt_objtype.Size = New System.Drawing.Size(112, 21)
Me.txt_objtype.TabIndex = 23
Me.txt_objtype.Text = ""
'
'txt_chapter
'
Me.txt_chapter.Enabled = False
Me.txt_chapter.Location = New System.Drawing.Point(216, 14)
Me.txt_chapter.MaxLength = 50
Me.txt_chapter.Name = "txt_chapter"
Me.txt_chapter.Size = New System.Drawing.Size(240, 21)
Me.txt_chapter.TabIndex = 22
Me.txt_chapter.Text = ""
'
'txt_subject
'
Me.txt_subject.Enabled = False
Me.txt_subject.Location = New System.Drawing.Point(56, 16)
Me.txt_subject.MaxLength = 50
Me.txt_subject.Name = "txt_subject"
Me.txt_subject.Size = New System.Drawing.Size(112, 21)
Me.txt_subject.TabIndex = 21
Me.txt_subject.Text = ""
'
'Label13
'
Me.Label13.Location = New System.Drawing.Point(312, 48)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(48, 16)
Me.Label13.TabIndex = 20
Me.Label13.Text = "分 数"
'
'lbl_opname
'
Me.lbl_opname.Location = New System.Drawing.Point(72, 82)
Me.lbl_opname.Name = "lbl_opname"
Me.lbl_opname.Size = New System.Drawing.Size(96, 16)
Me.lbl_opname.TabIndex = 19
'
'Label8
'
Me.Label8.Location = New System.Drawing.Point(16, 82)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(48, 16)
Me.Label8.TabIndex = 18
Me.Label8.Text = "录入者"
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(176, 48)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(76, 16)
Me.Label9.TabIndex = 16
Me.Label9.Text = "难 度 系 数"
'
'Label10
'
Me.Label10.Location = New System.Drawing.Point(16, 50)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(48, 16)
Me.Label10.TabIndex = 14
Me.Label10.Text = "题 型"
'
'Label11
'
Me.Label11.Location = New System.Drawing.Point(176, 18)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(40, 16)
Me.Label11.TabIndex = 12
Me.Label11.Text = "章 节"
'
'Label12
'
Me.Label12.Location = New System.Drawing.Point(16, 21)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(40, 16)
Me.Label12.TabIndex = 11
Me.Label12.Text = "课 程"
'
'GroupBox3
'
Me.GroupBox3.Controls.Add(Me.lbl_date)
Me.GroupBox3.Controls.Add(Me.Label7)
Me.GroupBox3.Controls.Add(Me.txt_totalscore)
Me.GroupBox3.Controls.Add(Me.Label6)
Me.GroupBox3.Controls.Add(Me.comb_testtype)
Me.GroupBox3.Controls.Add(Me.Label5)
Me.GroupBox3.Controls.Add(Me.comb_testmoth)
Me.GroupBox3.Controls.Add(Me.Label4)
Me.GroupBox3.Controls.Add(Me.txt_teacher)
Me.GroupBox3.Controls.Add(Me.Label3)
Me.GroupBox3.Controls.Add(Me.txt_testtitel)
Me.GroupBox3.Controls.Add(Me.Label2)
Me.GroupBox3.Dock = System.Windows.Forms.DockStyle.Top
Me.GroupBox3.Location = New System.Drawing.Point(3, 17)
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(461, 95)
Me.GroupBox3.TabIndex = 0
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "试卷信息"
'
'lbl_date
'
Me.lbl_date.Location = New System.Drawing.Point(88, 72)
Me.lbl_date.Name = "lbl_date"
Me.lbl_date.Size = New System.Drawing.Size(88, 16)
Me.lbl_date.TabIndex = 11
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(7, 72)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(72, 16)
Me.Label7.TabIndex = 10
Me.Label7.Text = "出卷时间："
'
'txt_totalscore
'
Me.txt_totalscore.Location = New System.Drawing.Point(400, 43)
Me.txt_totalscore.MaxLength = 20
Me.txt_totalscore.Name = "txt_totalscore"
Me.txt_totalscore.Size = New System.Drawing.Size(56, 21)
Me.txt_totalscore.TabIndex = 9
Me.txt_totalscore.Text = ""
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(352, 45)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(48, 16)
Me.Label6.TabIndex = 8
Me.Label6.Text = "总分："
'
'comb_testtype
'
Me.comb_testtype.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.comb_testtype.Items.AddRange(New Object() {"A卷", "B卷", "C卷", "D卷", "E卷", "F卷"})
Me.comb_testtype.Location = New System.Drawing.Point(248, 43)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -