about.frm
上传用户:tqlouisa
上传日期:2013-04-03
资源大小:742k
文件大小:5k
源码类别:

其他数据库

开发平台:

Visual Basic

  1. VERSION 5.00
  2. Begin VB.Form AboutMe 
  3.    BorderStyle     =   1  'Fixed Single
  4.    Caption         =   "关于系统"
  5.    ClientHeight    =   3945
  6.    ClientLeft      =   45
  7.    ClientTop       =   330
  8.    ClientWidth     =   4620
  9.    LinkTopic       =   "Form1"
  10.    MaxButton       =   0   'False
  11.    MDIChild        =   -1  'True
  12.    MinButton       =   0   'False
  13.    ScaleHeight     =   3945
  14.    ScaleWidth      =   4620
  15.    Begin VB.CommandButton Command1 
  16.       Caption         =   "确定"
  17.       Height          =   375
  18.       Left            =   1920
  19.       TabIndex        =   7
  20.       Top             =   3480
  21.       Width           =   735
  22.    End
  23.    Begin VB.PictureBox Picture1 
  24.       BorderStyle     =   0  'None
  25.       Height          =   1815
  26.       Left            =   0
  27.       Picture         =   "about.frx":0000
  28.       ScaleHeight     =   1815
  29.       ScaleWidth      =   2415
  30.       TabIndex        =   0
  31.       Top             =   840
  32.       Width           =   2415
  33.    End
  34.    Begin VB.Label Label2 
  35.       Caption         =   "版本号:1.0"
  36.       BeginProperty Font 
  37.          Name            =   "宋体"
  38.          Size            =   10.5
  39.          Charset         =   134
  40.          Weight          =   400
  41.          Underline       =   0   'False
  42.          Italic          =   0   'False
  43.          Strikethrough   =   0   'False
  44.       EndProperty
  45.       Height          =   255
  46.       Left            =   120
  47.       TabIndex        =   8
  48.       Top             =   3120
  49.       Width           =   1575
  50.    End
  51.    Begin VB.Label Label4 
  52.       Caption         =   "版权所有(C) 2004 梁峰"
  53.       BeginProperty Font 
  54.          Name            =   "方正姚体"
  55.          Size            =   9
  56.          Charset         =   134
  57.          Weight          =   400
  58.          Underline       =   0   'False
  59.          Italic          =   0   'False
  60.          Strikethrough   =   0   'False
  61.       EndProperty
  62.       ForeColor       =   &H000000FF&
  63.       Height          =   255
  64.       Index           =   4
  65.       Left            =   1200
  66.       TabIndex        =   6
  67.       Top             =   360
  68.       Width           =   2055
  69.    End
  70.    Begin VB.Label Label4 
  71.       Caption         =   "QQ:75857014"
  72.       BeginProperty Font 
  73.          Name            =   "宋体"
  74.          Size            =   10.5
  75.          Charset         =   134
  76.          Weight          =   400
  77.          Underline       =   0   'False
  78.          Italic          =   0   'False
  79.          Strikethrough   =   0   'False
  80.       EndProperty
  81.       Height          =   375
  82.       Index           =   3
  83.       Left            =   2640
  84.       TabIndex        =   5
  85.       Top             =   2040
  86.       Width           =   1815
  87.    End
  88.    Begin VB.Label Label4 
  89.       Caption         =   "Email To:Liangfeng_vic@163.com"
  90.       BeginProperty Font 
  91.          Name            =   "Lucida Handwriting"
  92.          Size            =   7.5
  93.          Charset         =   0
  94.          Weight          =   400
  95.          Underline       =   0   'False
  96.          Italic          =   0   'False
  97.          Strikethrough   =   0   'False
  98.       EndProperty
  99.       ForeColor       =   &H0080FF80&
  100.       Height          =   375
  101.       Index           =   1
  102.       Left            =   120
  103.       TabIndex        =   4
  104.       Top             =   2760
  105.       Width           =   3735
  106.    End
  107.    Begin VB.Label Label4 
  108.       Caption         =   "电话:0732-8684984"
  109.       BeginProperty Font 
  110.          Name            =   "宋体"
  111.          Size            =   10.5
  112.          Charset         =   134
  113.          Weight          =   400
  114.          Underline       =   0   'False
  115.          Italic          =   0   'False
  116.          Strikethrough   =   0   'False
  117.       EndProperty
  118.       Height          =   375
  119.       Index           =   0
  120.       Left            =   2640
  121.       TabIndex        =   3
  122.       Top             =   1560
  123.       Width           =   2055
  124.    End
  125.    Begin VB.Label Label3 
  126.       Caption         =   "作者:梁峰"
  127.       BeginProperty Font 
  128.          Name            =   "宋体"
  129.          Size            =   10.5
  130.          Charset         =   134
  131.          Weight          =   400
  132.          Underline       =   0   'False
  133.          Italic          =   0   'False
  134.          Strikethrough   =   0   'False
  135.       EndProperty
  136.       Height          =   375
  137.       Left            =   2640
  138.       TabIndex        =   2
  139.       Top             =   1080
  140.       Width           =   1935
  141.    End
  142.    Begin VB.Label Label1 
  143.       Caption         =   "湖工人事信息管理系统"
  144.       BeginProperty Font 
  145.          Name            =   "华文彩云"
  146.          Size            =   18
  147.          Charset         =   134
  148.          Weight          =   400
  149.          Underline       =   0   'False
  150.          Italic          =   0   'False
  151.          Strikethrough   =   0   'False
  152.       EndProperty
  153.       ForeColor       =   &H00FF0000&
  154.       Height          =   495
  155.       Left            =   480
  156.       TabIndex        =   1
  157.       Top             =   0
  158.       Width           =   3735
  159.    End
  160. End
  161. Attribute VB_Name = "AboutMe"
  162. Attribute VB_GlobalNameSpace = False
  163. Attribute VB_Creatable = False
  164. Attribute VB_PredeclaredId = True
  165. Attribute VB_Exposed = False
  166. Private Sub Command1_Click()
  167.   Unload Me
  168. End Sub