【VB开源代码栏目提醒】：网学会员为需要VB开源代码的朋友们搜集整理了main_rsgl_pxgl_lr.frm相关资料，希望对各位网友有所帮助!

    VERSION 5.00
    Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
    Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
    Begin VB.Form main_rsgl_pxgl_lr 
       BackColor       =   &H00E6D7D4&
       BorderStyle     =   3  'Fixed Dialog
       Caption         =   "Form1"
       ClientHeight    =   3465
       ClientLeft      =   45
       ClientTop       =   330
       ClientWidth     =   7290
       Icon            =   "main_rsgl_pxgl_lr.frx":0000
       LinkTopic       =   "Form1"
       MaxButton       =   0   'False
       MinButton       =   0   'False
       ScaleHeight     =   3465
       ScaleWidth      =   7290
       ShowInTaskbar   =   0   'False
       StartUpPosition =   2  '屏幕中心
       Begin VB.CommandButton Command2 
          BackColor       =   &H00FFF3DE&
          Caption         =   "取消"
          Height          =   390
          Left            =   3795
          Style           =   1  'Graphical
          TabIndex        =   18
          Top             =   2970
          Width           =   1770
       End
       Begin VB.CommandButton Command1 
          BackColor       =   &H00FFF3DE&
          Caption         =   "确定"
          Height          =   390
          Left            =   1905
          Style           =   1  'Graphical
          TabIndex        =   17
          Top             =   2970
          Width           =   1770
       End
       Begin VB.Frame Frame1 
          BackColor       =   &H00E6D7D4&
          Height          =   2940
          Left            =   15
          TabIndex        =   0
          Top             =   -60
          Width           =   7275
          Begin VB.TextBox Text1 
             Height          =   330
             Index           =   6
             Left            =   4755
             Locked          =   -1  'True
             TabIndex        =   20
             Text            =   "0"
             Top             =   1380
             Width           =   2400
          End
          Begin VB.TextBox Text1 
             Height          =   330
             Index           =   5
             Left            =   990
             TabIndex        =   19
             Top             =   1380
             Width           =   2730
          End
          Begin VB.TextBox Text1 
             Enabled         =   0   'False
             Height          =   330
             Index           =   0
             Left            =   990
             TabIndex        =   7
             Top             =   225
             Width           =   2730
          End
          Begin VB.TextBox Text1 
             Enabled         =   0   'False
             Height          =   330
             Index           =   1
             Left            =   4755
             TabIndex        =   6
             Top             =   255
             Width           =   2400
          End
          Begin VB.TextBox Text1 
             Height          =   330
             Index           =   2
             Left            =   4755
             Locked          =   -1  'True
             TabIndex        =   4
             Text            =   "0"
             Top             =   630
             Width           =   2400
          End
          Begin VB.TextBox Text1 
             Height          =   330
             Index           =   3
             Left            =   990
             Locked          =   -1  'True
             TabIndex        =   3
             Text            =   "0"
             Top             =   990
             Width           =   2730
          End
          Begin VB.TextBox Text1 
             Height          =   330
             Index           =   4
             Left            =   4755
             Locked          =   -1  'True
             TabIndex        =   2
             Text            =   "0"
             Top             =   1005
             Width           =   2400
          End
          Begin VB.TextBox Text1 
             Height          =   1050
             Index           =   7
             Left            =   975
             MultiLine       =   -1  'True
             ScrollBars      =   2  'Vertical
             TabIndex        =   1
             Top             =   1770
             Width           =   6165
          End
          Begin MSDataListLib.DataCombo DataCombo1 
             Bindings        =   "main_rsgl_pxgl_lr.frx":000C
             Height          =   330
             Left            =   990
             TabIndex        =   5
             Top             =   600
             Width           =   2730
             _ExtentX        =   4815
             _ExtentY        =   582
             _Version        =   393216
             ListField       =   "课程名称"
             BoundColumn     =   "课程编号"
             Text            =   ""
          End
          Begin VB.Label Label9 
             BackStyle       =   0  'Transparent
             Caption         =   "备注："
             Height          =   255
             Left            =   405
             TabIndex        =   16
             Top             =   1875
             Width           =   555
          End
          Begin VB.Label Label1 
             BackStyle       =   0  'Transparent
             Caption         =   "员工编号："
             Height          =   255
             Left            =   75
             TabIndex        =   15
             Top             =   315
             Width           =   1005
          End
          Begin VB.Label Label2 
             BackStyle       =   0  'Transparent
             Caption         =   "员工："
             Height          =   255
             Left            =   3795
             TabIndex        =   14
             Top             =   315
             Width           =   1005
          End
          Begin VB.Label Label3 
             BackStyle       =   0  'Transparent
             Caption         =   "课程名称："
             Height          =   255
             Left            =   75
             TabIndex        =   13
             Top             =   705
             Width           =   1005
          End
          Begin VB.Label Label4 
             BackStyle       =   0  'Transparent
             Caption         =   "时数："
             Height          =   255
             Left            =   4170
             TabIndex        =   12
             Top             =   690
             Width           =   555
          End
          Begin VB.Label Label5 
             BackStyle       =   0  'Transparent
             Caption         =   "开始时间："
             Height          =   255
             Left            =   60
             TabIndex        =   11
             Top             =   1080
             Width           =   1005
          End
          Begin VB.Label Label6 
             BackStyle       =   0  'Transparent
             Caption         =   "结束时间："
             Height          =   255
             Left            =   3825
             TabIndex        =   10
             Top             =   1080
             Width           =   1005
          End
          Begin VB.Label Label7 
             BackStyle       =   0  'Transparent
             Caption         =   "成绩："
             Height          =   255
             Left            =   420
             TabIndex        =   9
             Top             =   1425
             Width           =   555
          End
          Begin VB.Label Label8 
             BackStyle       =   0  'Transparent
             Caption         =   "费用："
             Height          =   255
             Left            =   4200
             TabIndex        =   8
             Top             =   1425
             Width           =   555
          End
       End
       Begin MSAdodcLib.Adodc Adodc1 
          Height          =   330
          Left            =   0
          Top             =   0
          Visible         =   0   'False
          Width           =   2040
          _ExtentX        =   3598
          _ExtentY        =   582
          ConnectMode     =   0
          CursorLocation  =   3
          IsolationLevel  =   -1
          ConnectionTimeout=   15
          CommandTimeout  =   30
          CursorType      =   3
          LockType        =   3
          CommandType     =   2
          CursorOptions   =   0
          CacheSize       =   50
          MaxRecords      =   0
          BOFAction       =   0
          EOFAction       =   0
          ConnectStringType=   1
          Appearance      =   1
          BackColor       =   -2147483643
          ForeColor       =   -2147483640
          Orientation     =   0
          Enabled         =   -1
          Connect         =   "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_manpowerinfo"
          OLEDBString     =   "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_manpowerinfo"
          OLEDBFile       =   ""
          DataSourceName  =   ""
          OtherAttributes =   ""
          UserName        =   ""
          Password        =   ""
          RecordSource    =   "培训课程表"