home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / OS_X_BETA_648323232002.psc / Form1.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  2002-03-22  |  6.0 KB  |  208 lines

  1. VERSION 5.00
  2. Begin VB.Form Form1 
  3.    Caption         =   "OS X Desktop"
  4.    ClientHeight    =   11115
  5.    ClientLeft      =   60
  6.    ClientTop       =   345
  7.    ClientWidth     =   15240
  8.    LinkTopic       =   "Form1"
  9.    ScaleHeight     =   11115
  10.    ScaleWidth      =   15240
  11.    Begin VB.PictureBox Picture1 
  12.       BorderStyle     =   0  'None
  13.       Height          =   495
  14.       Left            =   240
  15.       Picture         =   "Form1.frx":0000
  16.       ScaleHeight     =   495
  17.       ScaleWidth      =   615
  18.       TabIndex        =   10
  19.       Top             =   120
  20.       Width           =   615
  21.    End
  22.    Begin VB.PictureBox Picture2 
  23.       BorderStyle     =   0  'None
  24.       Height          =   495
  25.       Left            =   300
  26.       Picture         =   "Form1.frx":0442
  27.       ScaleHeight     =   495
  28.       ScaleWidth      =   495
  29.       TabIndex        =   9
  30.       Top             =   1200
  31.       Width           =   495
  32.    End
  33.    Begin VB.PictureBox Picture3 
  34.       BorderStyle     =   0  'None
  35.       Height          =   495
  36.       Left            =   240
  37.       Picture         =   "Form1.frx":0884
  38.       ScaleHeight     =   495
  39.       ScaleWidth      =   615
  40.       TabIndex        =   8
  41.       Top             =   2280
  42.       Width           =   615
  43.    End
  44.    Begin VB.CommandButton Command8 
  45.       Height          =   195
  46.       Left            =   1080
  47.       TabIndex        =   7
  48.       Top             =   9120
  49.       Visible         =   0   'False
  50.       Width           =   975
  51.    End
  52.    Begin VB.CommandButton Command7 
  53.       Caption         =   "X Office"
  54.       Default         =   -1  'True
  55.       Height          =   375
  56.       Left            =   1080
  57.       TabIndex        =   6
  58.       Top             =   9240
  59.       Visible         =   0   'False
  60.       Width           =   975
  61.    End
  62.    Begin VB.CommandButton Command6 
  63.       Caption         =   "Programes..."
  64.       Height          =   375
  65.       Left            =   0
  66.       TabIndex        =   5
  67.       Top             =   9240
  68.       Visible         =   0   'False
  69.       Width           =   1095
  70.    End
  71.    Begin VB.CommandButton Command5 
  72.       Caption         =   "Settings..."
  73.       Height          =   375
  74.       Left            =   0
  75.       TabIndex        =   4
  76.       Top             =   9600
  77.       Visible         =   0   'False
  78.       Width           =   1095
  79.    End
  80.    Begin VB.CommandButton Command4 
  81.       Caption         =   "Help..."
  82.       Height          =   375
  83.       Left            =   0
  84.       TabIndex        =   3
  85.       Top             =   9960
  86.       Visible         =   0   'False
  87.       Width           =   1095
  88.    End
  89.    Begin VB.CommandButton Command3 
  90.       Caption         =   "Shut Down"
  91.       Height          =   375
  92.       Left            =   0
  93.       TabIndex        =   2
  94.       Top             =   10320
  95.       Visible         =   0   'False
  96.       Width           =   1095
  97.    End
  98.    Begin VB.CommandButton Command2 
  99.       Enabled         =   0   'False
  100.       Height          =   375
  101.       Left            =   840
  102.       TabIndex        =   1
  103.       Top             =   10680
  104.       Width           =   14295
  105.    End
  106.    Begin VB.CommandButton Command1 
  107.       Caption         =   "OS X"
  108.       BeginProperty Font 
  109.          Name            =   "OCR A Extended"
  110.          Size            =   14.25
  111.          Charset         =   0
  112.          Weight          =   400
  113.          Underline       =   0   'False
  114.          Italic          =   0   'False
  115.          Strikethrough   =   0   'False
  116.       EndProperty
  117.       Height          =   375
  118.       Left            =   0
  119.       TabIndex        =   0
  120.       Top             =   10680
  121.       Width           =   855
  122.    End
  123.    Begin VB.Label Label5 
  124.       Caption         =   "OS X"
  125.       BeginProperty Font 
  126.          Name            =   "OCR A Extended"
  127.          Size            =   48
  128.          Charset         =   0
  129.          Weight          =   400
  130.          Underline       =   0   'False
  131.          Italic          =   0   'False
  132.          Strikethrough   =   0   'False
  133.       EndProperty
  134.       Height          =   1095
  135.       Left            =   5400
  136.       TabIndex        =   15
  137.       Top             =   3360
  138.       Width           =   2415
  139.    End
  140.    Begin VB.Label Label4 
  141.       Caption         =   "Pat Enterprises's"
  142.       BeginProperty Font 
  143.          Name            =   "OCR A Extended"
  144.          Size            =   14.25
  145.          Charset         =   0
  146.          Weight          =   400
  147.          Underline       =   0   'False
  148.          Italic          =   0   'False
  149.          Strikethrough   =   0   'False
  150.       EndProperty
  151.       Height          =   375
  152.       Left            =   5400
  153.       TabIndex        =   14
  154.       Top             =   2880
  155.       Width           =   2895
  156.    End
  157.    Begin VB.Label Label1 
  158.       Caption         =   "My X Computer"
  159.       Height          =   255
  160.       Left            =   0
  161.       TabIndex        =   13
  162.       Top             =   720
  163.       Width           =   1095
  164.    End
  165.    Begin VB.Label Label2 
  166.       Caption         =   "The Internet"
  167.       Height          =   255
  168.       Left            =   60
  169.       TabIndex        =   12
  170.       Top             =   1800
  171.       Width           =   975
  172.    End
  173.    Begin VB.Label Label3 
  174.       Caption         =   "Documents"
  175.       Height          =   255
  176.       Left            =   120
  177.       TabIndex        =   11
  178.       Top             =   2880
  179.       Width           =   855
  180.    End
  181. Attribute VB_Name = "Form1"
  182. Attribute VB_GlobalNameSpace = False
  183. Attribute VB_Creatable = False
  184. Attribute VB_PredeclaredId = True
  185. Attribute VB_Exposed = False
  186. Private Sub Command1_Click()
  187. Command3.Visible = True
  188. Command4.Visible = True
  189. Command5.Visible = True
  190. Command6.Visible = True
  191. End Sub
  192. Private Sub Command3_Click()
  193. Unload Me
  194. End Sub
  195. Private Sub Command6_Click()
  196. Command7.Visible = True
  197. Command8.Visible = True
  198. End Sub
  199. Private Sub Picture1_Click()
  200. Form2.Show
  201. End Sub
  202. Private Sub Picture2_Click()
  203. frmBrowser.Show
  204. End Sub
  205. Private Sub Picture3_Click()
  206. Form3.Show
  207. End Sub
  208.