home *** CD-ROM | disk | FTP | other *** search
- VERSION 4.00
- Begin VB.Form w_order
- BorderStyle = 3 'Fixed Dialog
- Caption = "Ordering Information"
- ClientHeight = 4260
- ClientLeft = 1815
- ClientTop = 2835
- ClientWidth = 7200
- Height = 4665
- Icon = "ct_order.frx":0000
- Left = 1755
- LinkTopic = "Form1"
- MaxButton = 0 'False
- MinButton = 0 'False
- ScaleHeight = 0
- ScaleWidth = 0
- ShowInTaskbar = 0 'False
- Top = 2490
- Width = 7320
- Begin VB.CommandButton Command1
- Caption = "E&xit"
- BeginProperty Font
- name = "MS Sans Serif"
- charset = 0
- weight = 700
- size = 8.25
- underline = 0 'False
- italic = 0 'False
- strikethrough = 0 'False
- EndProperty
- Height = 375
- Left = 6060
- TabIndex = 4
- Top = 3780
- Width = 975
- End
- Begin VB.Label Label4
- Caption = $"ct_order.frx":030A
- BeginProperty Font
- name = "MS Sans Serif"
- charset = 0
- weight = 700
- size = 8.25
- underline = 0 'False
- italic = 0 'False
- strikethrough = 0 'False
- EndProperty
- Height = 1095
- Left = 240
- TabIndex = 3
- Top = 2760
- Width = 6675
- End
- Begin VB.Label Label3
- Caption = $"ct_order.frx":0472
- BeginProperty Font
- name = "MS Sans Serif"
- charset = 0
- weight = 700
- size = 8.25
- underline = 0 'False
- italic = 0 'False
- strikethrough = 0 'False
- EndProperty
- Height = 1275
- Left = 240
- TabIndex = 2
- Top = 1320
- Width = 6675
- End
- Begin VB.Label Label2
- Caption = "Order Information and Demo Notes"
- BeginProperty Font
- name = "Arial"
- charset = 0
- weight = 700
- size = 15.75
- underline = -1 'True
- italic = 0 'False
- strikethrough = 0 'False
- EndProperty
- ForeColor = &H00800000&
- Height = 495
- Left = 240
- TabIndex = 1
- Top = 660
- Width = 6075
- End
- Begin VB.Label Label1
- Caption = "Component Toolbox OCX ver 1.0"
- BeginProperty Font
- name = "Arial"
- charset = 0
- weight = 700
- size = 15.75
- underline = -1 'True
- italic = 0 'False
- strikethrough = 0 'False
- EndProperty
- ForeColor = &H00800000&
- Height = 435
- Left = 240
- TabIndex = 0
- Top = 180
- Width = 5715
- End
- Attribute VB_Name = "w_order"
- Attribute VB_Creatable = False
- Attribute VB_Exposed = False
- Private Sub Command1_Click()
- Unload w_order
- End Sub
- Private Sub Form_Load()
- ' Center the window on the screen
- Move (Screen.Width - Width) / 2, (Screen.Height - Height) / 2
- End Sub
-