New in Wolfram Mathematica 7: New Graphics Primitives  previous | next 
Style Tube Ends in 3D Graphics
Customize the ends of tubes with CapForm.
In[1]:=

Click for copyable input
Graphics3D[{

  CapForm[None], Tube[{{0, 0, -1}, {0, 0, 1}}, .2],

  CapForm["Round"], Tube[{{1, 0, -1}, {1, 0, 1}}, .2],

  CapForm["Butt"], Tube[{{2, 0, -1}, {2, 0, 1}}, .2],

  CapForm["Square"], Tube[{{3, 0, -1}, {3, 0, 1}}, .2]

  }, Boxed -> False]
Out[1]=