3D Tubes in Visual Basic 6

Environment: Visual Basic 6.0

My purpose for writing this program is to present a visual demo or screen saver-type program. This program, however, is not a a screen saver. It will not be acknowledged by your computer as a screen saver when it is runn, but could be used as the basis for one.

This program presents colors that are shaded with my own sub procedure, which I came up with a while back. I use randoms for the sake of true variety in movement.The following are a few of the random figures generateed in this program.

Click here for larger image

Click here for larger image

Click here for larger image

This is a later version of my original Tube program which had one tube moving around. I have provided comments within the program that I believe are sufficient to explain how it functions. The sub procedures that do not have comment lines should be self-explanatory.

I have not found any bugs or had any problems with this finished version. It has run correctly on my computer using Windows ME Windows. Please feel free to use this program at your own risk. I hope you enjoy watching this.

Editors note: Works on Windows XP as well.

Chris Diemer


Download source code - 5Kb


  • Thank You!

    Posted by Phuc on 04/13/2012 06:09am

    Great your code. I have been viewed your code example about 3D in vb6. But i don't known do it. Can you help me example how to call *3ds file in to vb6? more times thank you very much!

  • Thanks for the posting this material

    Posted by hbmarar on 08/16/2004 02:07am

    I need example codes to learn,and got the one i was looking. let mee try and hope it would be nice stuff.

Leave a Comment
  • Your email address will not be published. All fields are required.

Top White Papers and Webcasts

  • As the mobile enterprise marketplace expands and customer needs grow more diverse, Samsung recognizes that solution partners and developers play an essential role by continually innovating to meet their customers' needs. Samsung works to provide these developers and partners with the latest tools and resources needed to create these solutions. Read this program guide to learn how the Samsung Enterprise Alliance Program provides partners and developers with Samsung enterprise software development kits (SDKs) …

  • On-demand Event Event Date: September 23, 2015 The cloud is not just about a runtime platform for your projects – now, you can do your development in the cloud, too. Check out this webcast to learn how the cloud improves your development experience and team collaboration. Join Dana Singleterry, Principal Product Manager for Oracle Dev Tools, as he discusses how to simplify every aspect of the development lifecycle, including requirements gathering, version management, code reviews, build automation, and …

Most Popular Programming Stories

More for Developers

RSS Feeds

Thanks for your registration, follow us on our social networks to keep up-to-date