In preparation for the release of REALbasic 2005, the company is giving away the Standard version of the current release (REALbasic 5.5)
It's not as deep as even VB6 as far as the range of properties for each object, but it's a pretty nice tool anyway. You can get a free license code at:
http://www.realbasic.com/vb6/index.php?id=WCSHVJSG
I think it's supposed to compete with VB, but I don't think the company has any delusions about unseating that product. It's an inexpensive alternative at best, but still worth a shot.