Category : BASIC Source Code
Archive : CZLIS110.ZIP
Filename : ORDER.FRM
Output of file : ORDER.FRM contained in archive : CZLIS110.ZIP
BEGIN Form frmOrder
AutoRedraw = 0
BackColor = QBColor(7)
BorderStyle = 2
Caption = "How to Order CzarList"
ControlBox = -1
Enabled = -1
ForeColor = QBColor(0)
Height = Char(23)
Left = Char(1)
MaxButton = -1
MinButton = -1
MousePointer = 0
Tag = ""
Top = Char(1)
Visible = -1
Width = Char(77)
WindowState = 0
BEGIN Frame Frame2
BackColor = QBColor(7)
Caption = "Method 2:"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(4)
Left = Char(1)
MousePointer = 0
TabIndex = 2
Tag = ""
Top = Char(4)
Visible = -1
Width = Char(73)
BEGIN Label Label4
Alignment = 2
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "Order CzarList with your VISA, MC, AMEX, or Discover by calling 1-800-242-4775 (orders only) or 1-713-524-6394. Use item # 11342."
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(2)
Left = Char(1)
MousePointer = 0
TabIndex = 3
Tag = ""
Top = Char(0)
Visible = -1
Width = Char(69)
END
END
BEGIN Frame Frame4
BackColor = QBColor(7)
Caption = "Method 3:"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(3)
Left = Char(1)
MousePointer = 0
TabIndex = 11
Tag = ""
Top = Char(8)
Visible = -1
Width = Char(73)
BEGIN Label Label5
Alignment = 2
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "Fax your order to 1-713-524-6398. Use file CREDIT.DOC to do it."
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Left = Char(1)
MousePointer = 0
TabIndex = 12
Tag = ""
Top = Char(0)
Visible = -1
Width = Char(69)
END
END
BEGIN Label Label7
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "Only US$ 69.00 + US$ 5.00 S/H"
DragMode = 0
Enabled = -1
ForeColor = QBColor(14)
Height = Char(1)
Left = Char(45)
MousePointer = 0
TabIndex = 15
Tag = ""
Top = Char(19)
Visible = -1
Width = Char(30)
END
BEGIN Label Label6
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "Only US$ 69.00 + US$ 5.00 S/H"
DragMode = 0
Enabled = -1
ForeColor = QBColor(14)
Height = Char(1)
Left = Char(1)
MousePointer = 0
TabIndex = 14
Tag = ""
Top = Char(19)
Visible = -1
Width = Char(29)
END
BEGIN CommandButton Command2
BackColor = QBColor(7)
Cancel = -1
Caption = "E&xit Demo"
Default = 0
DragMode = 0
Enabled = -1
Height = Char(3)
Left = Char(31)
MousePointer = 0
TabIndex = 13
TabStop = -1
Tag = ""
Top = Char(18)
Visible = -1
Width = Char(13)
END
BEGIN Frame Frame1
BackColor = QBColor(7)
Caption = "Method 1:"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(3)
Left = Char(1)
MousePointer = 0
TabIndex = 0
Tag = ""
Top = Char(1)
Visible = -1
Width = Char(73)
BEGIN Label Label1
Alignment = 2
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "Order CzarList through CompuServe (GO SWREG) and use ID# 2907"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Left = Char(1)
MousePointer = 0
TabIndex = 1
Tag = ""
Top = Char(0)
Visible = -1
Width = Char(69)
END
END
BEGIN Frame Frame3
BackColor = QBColor(7)
Caption = "Method 4:"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(7)
Left = Char(1)
MousePointer = 0
TabIndex = 4
Tag = ""
Top = Char(11)
Visible = -1
Width = Char(73)
BEGIN Label Label2
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "Send Check (drawn on US Bank), Money Order (US$ Funds only), or Cash"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Left = Char(1)
MousePointer = 0
TabIndex = 5
Tag = ""
Top = Char(0)
Visible = -1
Width = Char(69)
END
BEGIN Label Label3
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "(US$ Funds only) to:"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Index = 4
Left = Char(1)
MousePointer = 0
TabIndex = 10
Tag = ""
Top = Char(1)
Visible = -1
Width = Char(21)
END
BEGIN Label Label3
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "USA"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Index = 3
Left = Char(23)
MousePointer = 0
TabIndex = 9
Tag = ""
Top = Char(4)
Visible = -1
Width = Char(23)
END
BEGIN Label Label3
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "El Paso, TX 79937-0087"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Index = 2
Left = Char(23)
MousePointer = 0
TabIndex = 8
Tag = ""
Top = Char(3)
Visible = -1
Width = Char(23)
END
BEGIN Label Label3
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "P.O. Box 370087"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Index = 1
Left = Char(23)
MousePointer = 0
TabIndex = 7
Tag = ""
Top = Char(2)
Visible = -1
Width = Char(23)
END
BEGIN Label Label3
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "CZAR Software"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Index = 0
Left = Char(23)
MousePointer = 0
TabIndex = 6
Tag = ""
Top = Char(1)
Visible = -1
Width = Char(23)
END
BEGIN Label Label8
Alignment = 0
AutoSize = 0
BackColor = QBColor(7)
BorderStyle = 0
Caption = "(Use file REGISTER.DOC)"
DragMode = 0
Enabled = -1
ForeColor = QBColor(0)
Height = Char(1)
Left = Char(47)
MousePointer = 0
TabIndex = 16
Tag = ""
Top = Char(1)
Visible = -1
Width = Char(23)
END
END
END
DEFINT A-Z
SUB Command2_Click ()
END
END SUB
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/