home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programming Tool Box
/
SIMS_2.iso
/
vb_code1
/
bar
/
bar.frm
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1995-02-26
|
1KB
|
28 lines
Form1
Bar demo
Form1%
Command1
Click here
Text1
Text1
BarPic
Picture1_Click
Command1_Click
Text1_Change
Form_Click
Form_LinkClose
@ Form_Load
Text1
BarPic_Click
BarPic_Paint
BarPic_Paint
Command1_Click
Form_Load
(1) Make sure you have a Picture control named 'BARPIC'
(2) Set the AutoRedraw to TRUE
(3) Set the BorderStyle to 0 - None
(4) Add a 'Bar(0)' line in the Paint Event of BARPIC
And then... use it, modify it, enjoy it, but...
let me hear from you if you enhance it. OK?
Felipe PoloWood