Does someone have a function that creates a 3d sphere in VB (Direct3D)? I want to planets and other space stuff...