home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / CODE_UPLOAD15646312001.psc / frmInfo.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  2001-03-01  |  4.4 KB  |  141 lines
  1. VERSION 5.00
  2. Begin VB.Form frmInfo 
  3.    BackColor       =   &H00000000&
  4.    BorderStyle     =   0  'Kein
  5.    Caption         =   "Form1"
  6.    ClientHeight    =   4335
  7.    ClientLeft      =   0
  8.    ClientTop       =   0
  9.    ClientWidth     =   3615
  10.    LinkTopic       =   "Form1"
  11.    ScaleHeight     =   4335
  12.    ScaleWidth      =   3615
  13.    ShowInTaskbar   =   0   'False
  14.    StartUpPosition =   2  'Bildschirmmitte
  15.    Begin VB.CommandButton btnOK 
  16.       Caption         =   "OK"
  17.       CausesValidation=   0   'False
  18.       Default         =   -1  'True
  19.       Height          =   375
  20.       Left            =   1200
  21.       TabIndex        =   3
  22.       TabStop         =   0   'False
  23.       Top             =   3840
  24.       Width           =   1215
  25.    End
  26.    Begin VB.Label Label6 
  27.       Alignment       =   2  'Zentriert
  28.       AutoSize        =   -1  'True
  29.       BackStyle       =   0  'Transparent
  30.       Caption         =   "http://spiele.freepage/blackmushroom"
  31.       BeginProperty Font 
  32.          Name            =   "MS Sans Serif"
  33.          Size            =   8.25
  34.          Charset         =   0
  35.          Weight          =   700
  36.          Underline       =   -1  'True
  37.          Italic          =   0   'False
  38.          Strikethrough   =   0   'False
  39.       EndProperty
  40.       ForeColor       =   &H00FFFF00&
  41.       Height          =   195
  42.       Left            =   165
  43.       MousePointer    =   10  'Aufw
  44. rtspfeil
  45.       TabIndex        =   6
  46.       Top             =   2160
  47.       Width           =   3315
  48.    End
  49.    Begin VB.Label Label5 
  50.       Alignment       =   2  'Zentriert
  51.       BackStyle       =   0  'Transparent
  52.       Caption         =   $"frmInfo.frx":0000
  53.       ForeColor       =   &H0000FFFF&
  54.       Height          =   975
  55.       Left            =   360
  56.       TabIndex        =   5
  57.       Top             =   2640
  58.       Width           =   3015
  59.    End
  60.    Begin VB.Label Label4 
  61.       Alignment       =   2  'Zentriert
  62.       BackStyle       =   0  'Transparent
  63.       Caption         =   "Or you can visit my Homepage at:"
  64.       ForeColor       =   &H0000FFFF&
  65.       Height          =   315
  66.       Left            =   480
  67.       TabIndex        =   4
  68.       Top             =   1920
  69.       Width           =   2535
  70.    End
  71.    Begin VB.Label Label3 
  72.       Alignment       =   2  'Zentriert
  73.       AutoSize        =   -1  'True
  74.       BackStyle       =   0  'Transparent
  75.       Caption         =   "BlackMushroom@AOL.com"
  76.       BeginProperty Font 
  77.          Name            =   "MS Sans Serif"
  78.          Size            =   8.25
  79.          Charset         =   0
  80.          Weight          =   700
  81.          Underline       =   -1  'True
  82.          Italic          =   0   'False
  83.          Strikethrough   =   0   'False
  84.       EndProperty
  85.       ForeColor       =   &H00FFFF00&
  86.       Height          =   195
  87.       Left            =   645
  88.       MousePointer    =   10  'Aufw
  89. rtspfeil
  90.       TabIndex        =   2
  91.       Top             =   1440
  92.       Width           =   2325
  93.    End
  94.    Begin VB.Label Label2 
  95.       Alignment       =   2  'Zentriert
  96.       BackStyle       =   0  'Transparent
  97.       Caption         =   "(C) 2001 by BlackMushroom Send Comments/Questions to:"
  98.       ForeColor       =   &H0000FFFF&
  99.       Height          =   435
  100.       Left            =   600
  101.       TabIndex        =   1
  102.       Top             =   960
  103.       Width           =   2295
  104.    End
  105.    Begin VB.Label Label1 
  106.       Alignment       =   2  'Zentriert
  107.       BackStyle       =   0  'Transparent
  108.       Caption         =   "AniMaker"
  109.       BeginProperty Font 
  110.          Name            =   "MS Sans Serif"
  111.          Size            =   24
  112.          Charset         =   0
  113.          Weight          =   700
  114.          Underline       =   0   'False
  115.          Italic          =   0   'False
  116.          Strikethrough   =   0   'False
  117.       EndProperty
  118.       ForeColor       =   &H00808000&
  119.       Height          =   495
  120.       Left            =   480
  121.       TabIndex        =   0
  122.       Top             =   240
  123.       Width           =   2775
  124.    End
  125. Attribute VB_Name = "frmInfo"
  126. Attribute VB_GlobalNameSpace = False
  127. Attribute VB_Creatable = False
  128. Attribute VB_PredeclaredId = True
  129. Attribute VB_Exposed = False
  130. Option Explicit
  131. Private Sub btnOK_Click()
  132.     Me.Hide
  133.     Unload Me
  134. End Sub
  135. Private Sub Label3_Click()
  136.     Call_Url Me, "mailto:BlackMushroom@AOL.com"
  137. End Sub
  138. Private Sub Label6_Click()
  139.     Call_Url Me, "http://spiele.freepage.de/blackmushroom"
  140. End Sub
  141.