frmselect.frm

上机考试系统

VERSION 5.00
Begin VB.Form SelectOne 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "单项选择题题库管理"
   ClientHeight    =   7260
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   9900
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MDIChild        =   -1  'True
   MinButton       =   0   'False
   ScaleHeight     =   7260
   ScaleWidth      =   9900
   Begin VB.OptionButton optC 
      Caption         =   "C"
      Height          =   180
      Left            =   2391
      TabIndex        =   28
      Top             =   3435
      Width           =   420
   End
   Begin VB.OptionButton optD 
      Caption         =   "D"
      Height          =   180
      Left            =   2850
      TabIndex        =   27
      Top             =   3435
      Width           =   420
   End
   Begin VB.TextBox txtD 
      Height          =   270
      Left            =   1117
      TabIndex        =   26
      Top             =   2945
      Width           =   5805
   End
   Begin VB.TextBox txtC 
      Height          =   270
      Left            =   1117
      TabIndex        =   25
      Top             =   2595
      Width           =   5805
   End
   Begin VB.TextBox txtB 
      Height          =   270
      Left            =   1125
      TabIndex        =   24
      Top             =   2229
      Width           =   5805
   End
   Begin VB.TextBox txtA 
      Height          =   270
      Left            =   1117
      TabIndex        =   23
      Top             =   1871
      Width           =   5805
   End
   Begin VB.OptionButton optB 
      Caption         =   "B"
      Height          =   180
      Left            =   1934
      TabIndex        =   2
      Top             =   3435
      Width           =   420
   End
   Begin VB.OptionButton optA 
      Caption         =   "A"
      Height          =   180
      Left            =   1477
      TabIndex        =   1
      Top             =   3435
      Width           =   420
   End
   Begin VB.TextBox txtPoint 
      Height          =   270
      Left            =   4747
      MaxLength       =   1
      TabIndex        =   3
      Text            =   "1"
      Top             =   3390
      Width           =   630
   End
   Begin VB.TextBox txtParse 
      Height          =   1065
      Left            =   622
      MaxLength       =   200
      MultiLine       =   -1  'True
      TabIndex        =   4
      Top             =   4065
      Width           =   6300
   End
   Begin VB.TextBox txtQuestion 
      Height          =   1080
      Left            =   622
      MaxLength       =   100
      MultiLine       =   -1  'True
      TabIndex        =   0
      Top             =   585
      Width           =   6300
   End
   Begin VB.CommandButton cmdSave 
      Caption         =   "保存"
      Height          =   300
      Left            =   3780
      TabIndex        =   7
      Top             =   5430
      Width           =   735
   End
   Begin VB.CommandButton cmdExit 
      Cancel          =   -1  'True
      Caption         =   "退出"
      Height          =   300
      Left            =   4515
      TabIndex        =   8
      Top             =   5430
      Width           =   735
   End
   Begin VB.CommandButton cmdDelete 
      Caption         =   "删除"
      Height          =   300
      Left            =   3030
      TabIndex        =   6
      Top             =   5430
      Width           =   735
   End
   Begin VB.CommandButton cmdAdd 
      Caption         =   "添加"
      Height          =   300
      Left            =   2295
      TabIndex        =   5
      Top             =   5430
      Width           =   735
   End
   Begin VB.PictureBox picNavigation 
      AutoSize        =   -1  'True
      BorderStyle     =   0  'None
      Height          =   350
      Left            =   2700
      ScaleHeight     =   345
      ScaleWidth      =   2415
      TabIndex        =   13
      Top             =   5745
      Width           =   2410
      Begin VB.CommandButton cmdMove 
         Height          =   270
         Index           =   1
         Left            =   270
         Picture         =   "frmSelect.frx":0000
         Style           =   1  'Graphical
         TabIndex        =   10
         Top             =   0
         Width           =   300
      End
      Begin VB.CommandButton cmdMove 
         Height          =   270
         Index           =   0
         Left            =   -15
         Picture         =   "frmSelect.frx":0044
         Style           =   1  'Graphical
         TabIndex        =   9
         Top             =   0
         Width           =   300
      End
      Begin VB.CommandButton cmdMove 
         Height          =   270
         Index           =   3
         Left            =   2010
         Picture         =   "frmSelect.frx":0091
         Style           =   1  'Graphical
         TabIndex        =   12
         Top             =   -15
         Width           =   300
      End
      Begin VB.CommandButton cmdMove 
         Height          =   270
         Index           =   2
         Left            =   1725
         Picture         =   "frmSelect.frx":00DD
         Style           =   1  'Graphical
         TabIndex        =   11
         Top             =   -15
         Width           =   300
      End
      Begin VB.TextBox txtNews 
         Height          =   270
         Left            =   555
         Locked          =   -1  'True
         TabIndex        =   14
         TabStop         =   0   'False
         Top             =   0
         Width           =   1185
      End
   End
   Begin VB.Label Label8 
      AutoSize        =   -1  'True
      Caption         =   "试题解析"
      Height          =   180
      Left            =   622
      TabIndex        =   22
      Top             =   3795
      Width           =   720
   End
   Begin VB.Label Label7 
      AutoSize        =   -1  'True
      Caption         =   "参考分数"
      Height          =   180
      Left            =   3915
      TabIndex        =   21
      Top             =   3435
      Width           =   720
   End
   Begin VB.Label Label6 
      AutoSize        =   -1  'True
      Caption         =   "参考答案"
      Height          =   180
      Left            =   615
      TabIndex        =   20
      Top             =   3435
      Width           =   720
   End
   Begin VB.Label Label5 
      AutoSize        =   -1  'True
      Caption         =   "选项D"
      Height          =   180
      Left            =   622
      TabIndex        =   19
      Top             =   2990
      Width           =   450
   End
   Begin VB.Label Label3 
      AutoSize        =   -1  'True
      Caption         =   "选项B"
      Height          =   180