home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Tool Box
/
SIMS_2.iso
/
vb_demos
/
meta_lib
/
credits.frm
(
.txt
)
next >
Wrap
Visual Basic Form
|
1992-03-04
|
4KB
|
110 lines
Credits
About METALib
Form1
Picture1
Picture2
StopCredits
butPauseContinue
Pause
Timer1
Form_Clickc
@ Form_LoadJ
Directed
Upham
Rickx
Andrews
Associate
Producert
Grubic
Visualr
Basic7
Microsoft
Corporation
Design
Larry
Allen\
Special
Effects
Judyv
Raemerz
Coffee
dougnuts
servedJ
intermission
foyer
METALiB
Start!
CreditLine
PrintLine
Command1_Click
StopCredits_Click
Credits
Credts0
picture2
StopCredits3
Heighth
picture1
ScaleHeight
CurrentY
TopCredits
CreditsStop
CreditStop
Picture1_Click
Picture2_Click
SpeedW
ScrollCredits
FontName
FontSize
Width
ScaleWidth?
Timer1_Timer
Timer1
Enable
Interval
Enabled
Scalemode
StopCred
Form_Unload
butPauseContinue_Click
FALSE
butPauseContinue
Caption$
Form_Load
Courier"
developer. Use at your own risk. Any resemblance
StopCredits_Click
ScrollCredits
METALiB
A Sygenex Incorporated Production"
Produced by Rick Andrews"
Directed by Jon Upham
Written by Jon Upham
Special Effects by Judy Raemer
Visual Basic by Microsoft Corp.
Associate Producer Mary Grubic
Executive Producer Larry Allen
Special Thanks to Ted M. Young"
Jonathan Zuck
Based on original story by George Campbell
This program has been rated UT (UnTested) by the"
developer. Use at your own risk. Any resemblance
to other programs is purely coincidental."
Coffee and doughnuts served at intermission in"
the foyer.
Copyright "
1992 Sygenex, Inc."
15446 Bel-Red Rd. Suite 450"
Redmond, WA 98052"
Phone: 206-881-5500"
Compuserve: 70742,1226
Put the text in the picture2e
Do Until CreditStop% = -1P
Picture2.Top = TopCredits"
TopCredits = TopCredits - Speed(
If TopCredits < -2 / 3 * Picture2.Height Then TopCredits = 0
Ret% = DoEvents()2
Timer1_Timer
butPauseContinue_Click
&Continue"
&Pause