paperproperty.frm

很不错的哦!!! !!! !!! !!! !!!1

VERSION 5.00
Begin VB.Form PaperProperty 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "设置试卷参数"
   ClientHeight    =   5535
   ClientLeft      =   3930
   ClientTop       =   2865
   ClientWidth     =   7905
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   5535
   ScaleWidth      =   7905
   Begin VB.CommandButton cmdExit 
      Caption         =   "关闭"
      Height          =   375
      Left            =   6120
      TabIndex        =   61
      Top             =   4800
      Width           =   1455
   End
   Begin VB.CommandButton cmdMakePaker 
      Caption         =   "生成试卷"
      Height          =   375
      Left            =   6120
      TabIndex        =   60
      Top             =   4200
      Width           =   1455
   End
   Begin VB.CommandButton cmdAnalyse 
      Caption         =   "参数分析"
      Height          =   375
      Left            =   6120
      TabIndex        =   59
      Top             =   3600
      Width           =   1455
   End
   Begin VB.Frame Frame2 
      Caption         =   "章节中试题分配"
      Height          =   2415
      Left            =   240
      TabIndex        =   1
      Top             =   2880
      Width           =   5655
      Begin VB.TextBox txtScale 
         Height          =   270
         Index           =   3
         Left            =   3600
         TabIndex        =   54
         Text            =   "0"
         Top             =   1800
         Width           =   855
      End
      Begin VB.TextBox txtScale 
         Height          =   270
         Index           =   2
         Left            =   3600
         TabIndex        =   53
         Text            =   "0"
         Top             =   1320
         Width           =   855
      End
      Begin VB.TextBox txtScale 
         Height          =   270
         Index           =   1
         Left            =   3600
         TabIndex        =   52
         Text            =   "0"
         Top             =   840
         Width           =   855
      End
      Begin VB.TextBox txtScale 
         Height          =   270
         Index           =   0
         Left            =   3600
         TabIndex        =   51
         Text            =   "0"
         Top             =   360
         Width           =   855
      End
      Begin VB.ComboBox cmbChapter 
         Height          =   300
         Index           =   3
         Left            =   1200
         Style           =   2  'Dropdown List
         TabIndex        =   5
         Top             =   1800
         Width           =   2295
      End
      Begin VB.ComboBox cmbChapter 
         Height          =   300
         Index           =   2
         Left            =   1200
         Style           =   2  'Dropdown List
         TabIndex        =   4
         Top             =   1320
         Width           =   2295
      End
      Begin VB.ComboBox cmbChapter 
         Height          =   300
         Index           =   1
         Left            =   1200
         Style           =   2  'Dropdown List
         TabIndex        =   3
         Top             =   840
         Width           =   2295
      End
      Begin VB.ComboBox cmbChapter 
         Height          =   300
         Index           =   0
         Left            =   1200
         Style           =   2  'Dropdown List
         TabIndex        =   2
         Top             =   360
         Width           =   2295
      End
      Begin VB.Label lblRemain 
         AutoSize        =   -1  'True
         Caption         =   "100"
         Height          =   255
         Index           =   3
         Left            =   4800
         TabIndex        =   58
         Top             =   1800
         Width           =   375
      End
      Begin VB.Label lblRemain 
         AutoSize        =   -1  'True
         Caption         =   "100"
         Height          =   255
         Index           =   2
         Left            =   4800
         TabIndex        =   57
         Top             =   1320
         Width           =   375
      End
      Begin VB.Label lblRemain 
         AutoSize        =   -1  'True
         Caption         =   "100"
         Height          =   255
         Index           =   1
         Left            =   4800
         TabIndex        =   56
         Top             =   840
         Width           =   375
      End
      Begin VB.Label lblRemain 
         AutoSize        =   -1  'True
         Caption         =   "100"
         Height          =   255
         Index           =   0
         Left            =   4800
         TabIndex        =   55
         Top             =   360
         Width           =   375
      End
      Begin VB.Label Label21 
         AutoSize        =   -1  'True
         Caption         =   "剩余"
         Height          =   255
         Left            =   4800
         TabIndex        =   50
         Top             =   120
         Width           =   375
      End
      Begin VB.Label Label20 
         AutoSize        =   -1  'True
         Caption         =   "题量百分比"
         Height          =   180
         Left            =   3600
         TabIndex        =   49
         Top             =   120
         Width           =   900
      End
      Begin VB.Label Label15 
         AutoSize        =   -1  'True
         Caption         =   "填空题"
         Height          =   255
         Left            =   360
         TabIndex        =   44
         Top             =   1800
         Width           =   615
      End
      Begin VB.Label Label14 
         AutoSize        =   -1  'True
         Caption         =   "多选题"
         Height          =   255
         Left            =   360
         TabIndex        =   43
         Top             =   1320
         Width           =   615
      End
      Begin VB.Label Label13 
         AutoSize        =   -1  'True
         Caption         =   "单选题"
         Height          =   255
         Left            =   360
         TabIndex        =   42
         Top             =   840
         Width           =   615
      End
      Begin VB.Label Label12 
         AutoSize        =   -1  'True
         Caption         =   "判断题"
         Height          =   255
         Left            =   360
         TabIndex        =   41
         Top             =   480
         Width           =   615
      End
   End
   Begin VB.Frame Frame1 
      Caption         =   "试题题量、分值和难度"
      Height          =   2295
      Left            =   240
      TabIndex        =   0
      Top             =   360
      Width           =   7095
      Begin VB.TextBox txtLeve12 
         Height          =   375
         Index           =   3
         Left            =   6000
         TabIndex        =   40
         Text            =   "30"
         Top             =   1680
         Width           =   615
      End
      Begin VB.TextBox txtLeve12 
         Height          =   375
         Index           =   2
         Left            =   6000
         TabIndex        =   39
         Text            =   "30"
         Top             =   1320
         Width           =   615
      End
      Begin VB.TextBox txtLeve12 
         Height          =   375
         Index           =   1
         Left            =   6000
         TabIndex        =   38
         Text            =   "30"
         Top             =   960
         Width           =   615
      End
      Begin VB.TextBox txtLeve12 
         Height          =   375
         Index           =   0
         Left            =   6000
         TabIndex        =   37
         Text            =   "30"
         Top             =   600
         Width           =   615
      End
      Begin VB.TextBox txtLeve11 
         Height          =   375
         Index           =   3
         Left            =   5160
         TabIndex        =   36
         Text            =   "50"
         Top             =   1680
         Width           =   615
      End
      Begin VB.TextBox txtLeve11 
         Height          =   375
         Index           =   2
         Left            =   5160
         TabIndex        =   35
         Text            =   "50"
         Top             =   1320
         Width           =   615
      End
      Begin VB.TextBox txtLeve11 
         Height          =   375
         Index           =   1
         Left            =   5160
         TabIndex        =   34
         Text            =   "50"
         Top             =   960
         Width           =   615
      End
      Begin VB.TextBox txtLeve11 
         Height          =   375
         Index           =   0
         Left            =   5160
         TabIndex        =   33
         Text            =   "50"
         Top             =   600
         Width           =   615
      End
      Begin VB.TextBox txtLeve10 
         Height          =   375
         Index           =   3
         Left            =   4200
         TabIndex        =   32
         Text            =   "20"
         Top             =   1680
         Width           =   615
      End
      Begin VB.TextBox txtLeve10 
         Height          =   375
         Index           =   2
         Left            =   4200
         TabIndex        =   31
         Text            =   "20"
         Top             =   1320
         Width           =   615
      End
      Begin VB.TextBox txtLeve10 
         Height          =   375
         Index           =   1
         Left            =   4200
         TabIndex        =   30
         Text            =   "20"
         Top             =   960
         Width           =   615
      End
      Begin VB.TextBox txtLeve10 
         Height          =   375
         Index           =   0
         Left            =   4200