|
Awesome 3D Buttons! No OCX's
|
Email
|
| Submitted on: |
12/12/1999 |
| By: |
Michael Heath
|
| Level: |
Beginner |
| User Rating: |
By 3 Users |
| Compatibility: |
VB 5.0, VB 6.0 |
| Views: |
31863 |
|
(About the author) |
|
|
|
This is great! A 3D button with no OCX's or API's. Every thing 3D on your forms is just an illusion. Well, this one is a great illusion. Anyone can do it. Just look at the code and you will see how to use it. One button is fixed, the other one you can resize and move. Uses a regular command button and some lines. I hope you enjoy and can use this code. Please leave me some comments on what you think. Any way to make it better with out making it into an OCX. And if you already know how to do something like this, great! I don't need to hear from you with how badly it was done. Just let it go. Anyway, the rest of you, enjoy the code!
|
| |
|
 Download code
Note: Due to the size or complexity of this submission, the author has submitted it as a .zip file to shorten your download time. Afterdownloading it, you will need a program like Winzip to decompress it.Virus note:All files are scanned once-a-day by Planet Source Code for viruses, but new viruses come
out every day, so no prevention program can catch 100% of them. For your own safety, please:
- Re-scan downloaded files using your personal virus checker before using it.
- NEVER, EVER run compiled files (.exe's, .ocx's, .dll's etc.)--only run source code.
- Scan the source code with Minnow's Project Scanner
If you don't have a virus scanner, you can get one at many places on the net
including:McAfee.com
|
Terms of Agreement:
By using this code, you agree to the following terms...
- You may use
this code in your own programs (and may compile it into a program and distribute it in compiled format for languages that allow it) freely and with no charge.
- You MAY NOT redistribute this code (for example to a web site) without written permission from the original author. Failure to do so is a violation of copyright laws.
- You may link to this code from another website, but ONLY if it is not wrapped in a frame.
- You will abide by any additional copyright restrictions which the author may have placed in the code or code's description.
|
Other 29 submission(s) by this author
|
|
Report Bad Submission
|
Your Vote
|
| |
Other User Comments
|
 12/16/1999 8:20:55 AM: Automon
Hey, this is cool! Thanks for the code.
(If this comment was disrespectful, please report it.)
|
1/14/2000 9:06:11 AM: xinex
its good code and working in visual basic 5.0
(If this comment was disrespectful, please report it.)
|
1/16/2000 9:45:43 PM: Rich
Very well done. I would appreciate any tips you can provide.
Thanks again.
(If this comment was disrespectful, please report it.)
|
1/23/2000 7:26:22 AM: RedMan
I have found a better way using no lines to do this, and it looks a lot better, I will post it soon.
(If this comment was disrespectful, please report it.)
|
1/26/2000 3:14:50 PM: Krishna Kumar Yergol
thanks for this interesting code..!
(If this comment was disrespectful, please report it.)
|
1/26/2000 6:08:08 PM: Mike Heath
I'm sorry if anyone thought the code was lame. Honestly, I did too. I didn't post the code expecting it to win anything. Basically, I was hoping someone would see it and think "Hey, I can do better." Well, someone did, so we all got what we really wanted. Just do a search for T3D and you will see some code done by Stephan Swertvaegher. His code goes way beyond what I did and doesn't use those s_tupid lines. Just look at his stuff, it's really good. Of course, he is probably a real programmer. Me, I'm just a hobbiest.
Thanks for your comments
(If this comment was disrespectful, please report it.)
|
2/2/2000 1:24:33 AM: abdullha
I like this good jop
(If this comment was disrespectful, please report it.)
|
2/2/2000 2:01:05 AM: abdullah
hello every one
I need help how I can
make auto run for my Application so no
need to go to start then run elc..
I
need it auto run
thank you
(If this comment was disrespectful, please report it.)
|
2/2/2000 11:31:16 AM: Kamalesh
Its looking great,
Thanx
(If this comment was disrespectful, please report it.)
|
2/2/2000 1:38:45 PM: Joey
Thanks Mike for submitting this code for
newbies such as myself to learn from. We
appreciate it!
(If this comment was disrespectful, please report it.)
|
11/28/2001 8:36:56 PM: ocx
to make a autorun...open note pad type this
----------------
[autorun]
OPEN=Filename.exe
then SAVE AS Autorun.inf
(If this comment was disrespectful, please report it.)
|
11/28/2001 8:38:44 PM: ocx
[autorun}
OPEN=Filename.exe
(If this comment was disrespectful, please report it.)
|
8/3/2003 1:12:42 AM: daniel corral
why not do this
Private Sub Timer1_Timer() 'int at 1
Label1.Caption = Label1.Caption + 1
If Label1.Caption = "50" Then
Line3.BorderColor = vbBlack
Line4.BorderColor = vbBlack
Line2.BorderColor = vbWhite
Line1.BorderColor = vbWhite
End If
If Label1.Caption = "100" Then
Line1.BorderColor = vbBlack
Line2.BorderColor = vbBlack
Line3.BorderColor = vbWhite
Line4.BorderColor = vbWhite
End If
end sub
(If this comment was disrespectful, please report it.)
|
Add Your Feedback
Your feedback will be posted below and an email sent to
the author. Please remember that the author was kind enough to
share this with you, so any criticisms must be stated politely, or they
will be deleted. (For feedback not related to this particular code, please
click here instead.)
To post feedback, first please login.
|
