输入圆柱体的半径与高度,输出表面积和体积VB