frmconfig_05.frm

vb源码之家界面源码,非常详细的说明和代码

VERSION 5.00
Begin VB.Form frmConfig_05 
   Appearance      =   0  'Flat
   BackColor       =   &H80000005&
   BorderStyle     =   0  'None
   Caption         =   "Form1"
   ClientHeight    =   4575
   ClientLeft      =   0
   ClientTop       =   0
   ClientWidth     =   6375
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   4575
   ScaleWidth      =   6375
   ShowInTaskbar   =   0   'False
   StartUpPosition =   3  '窗口缺省
   Begin VBFriend2006.Xp_Frame Xp_Frame1 
      Height          =   1635
      Left            =   90
      TabIndex        =   0
      Top             =   60
      Width           =   6135
      _ExtentX        =   10821
      _ExtentY        =   2884
      Caption         =   "选项设置"
      BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "宋体"
         Size            =   9
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      BackColor       =   16777215
      Begin VB.PictureBox Picture1 
         Appearance      =   0  'Flat
         BackColor       =   &H00FFFFFF&
         BorderStyle     =   0  'None
         ForeColor       =   &H80000008&
         Height          =   1095
         Left            =   225
         ScaleHeight     =   1095
         ScaleWidth      =   2955
         TabIndex        =   4
         Top             =   300
         Width           =   2955
         Begin VB.ListBox lstInput 
            Appearance      =   0  'Flat
            Height          =   2970
            Left            =   -15
            Style           =   1  'Checkbox
            TabIndex        =   5
            Top             =   -15
            Width           =   6015
         End
      End
      Begin VBFriend2006.XpCheckBox chkInput 
         Height          =   285
         Index           =   0
         Left            =   3450
         TabIndex        =   1
         Top             =   240
         Width           =   2025
         _ExtentX        =   3572
         _ExtentY        =   503
         Caption         =   "显示模块详细信息"
         BackColor       =   16777215
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
      Begin VBFriend2006.XpCheckBox chkInput 
         Height          =   285
         Index           =   1
         Left            =   3690
         TabIndex        =   2
         Top             =   540
         Width           =   2025
         _ExtentX        =   3572
         _ExtentY        =   503
         Caption         =   "显示函数详细信息"
         BackColor       =   16777215
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
      Begin VBFriend2006.XpCheckBox chkInput 
         Height          =   285
         Index           =   2
         Left            =   3930
         TabIndex        =   3
         Top             =   840
         Width           =   2025
         _ExtentX        =   3572
         _ExtentY        =   503
         Caption         =   "显示代码量、注释量"
         BackColor       =   16777215
         BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
            Name            =   "宋体"
            Size            =   9
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
      End
      Begin VBFriend2006.CommandButton cmdWork 
         Height          =   285
         Index           =   2
         Left            =   4200
         TabIndex        =   6
         Top             =   1200
         Width           =   825
         _ExtentX        =   1455
         _ExtentY        =   503
         Caption         =   "扫描"
         DotBackColor    =   -2147483633
      End
      Begin VBFriend2006.CommandButton cmdWork 
         Height          =   285
         Index           =   3
         Left            =   5130
         TabIndex        =   7
         Top             =   1200
         Width           =   825
         _ExtentX        =   1455
         _ExtentY        =   503
         Caption         =   "保存"
         DotBackColor    =   -2147483633
      End
      Begin VB.Shape ShapeBorder 
         BorderColor     =   &H00B99D7F&
         Height          =   1185
         Left            =   210
         Top             =   270
         Width           =   3015
      End
   End
   Begin VBFriend2006.Xp_Frame Xp_Frame2 
      Height          =   2595
      Left            =   90
      TabIndex        =   8
      Top             =   1800
      Width           =   6135
      _ExtentX        =   10821
      _ExtentY        =   4577
      Caption         =   "代码信息"
      BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} 
         Name            =   "宋体"
         Size            =   9
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      BackColor       =   16777215
      Begin VB.TextBox txtReg 
         Appearance      =   0  'Flat
         BorderStyle     =   0  'None
         ForeColor       =   &H00000000&
         Height          =   2235
         Left            =   210
         Locked          =   -1  'True
         MultiLine       =   -1  'True
         ScrollBars      =   2  'Vertical
         TabIndex        =   9
         Top             =   240
         Width           =   5775
      End
   End
End
Attribute VB_Name = "frmConfig_05"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
'*************************************************************************
'**函 数 名：Form_Load
'**输    入：无
'**输    出：无
'**功能描述：
'**全局变量：
'**调用模块：
'**作    者：叶帆
'**日    期：2005-10-18 11:49:08
'**修 改 人：
'**日    期：
'**版    本：V1.0.0
'*************************************************************************
Private Sub Form_Load()
  Me.Move 0, 0
End Sub

'*************************************************************************
'**函 数 名：SaveValue
'**输    入：无
'**输    出：无
'**功能描述：保存参数
'**全局变量：
'**调用模块：
'**作    者：叶帆
'**日    期：2005-11-10 10:50:20
'**修 改 人：
'**日    期：
'**版    本：V1.0.0
'*************************************************************************
Public Sub SaveValue()
    
End Sub

'*************************************************************************
'**函 数 名：ResumeValue
'**输    入：无
'**输    出：无
'**功能描述：恢复参数
'**全局变量：
'**调用模块：
'**作    者：叶帆
'**日    期：2005-11-10 10:52:05
'**修 改 人：
'**日    期：
'**版    本：V1.0.0
'*************************************************************************
Public Sub ResumeValue()
    
End Sub