1、打开VB软件，建立标准EXE工程。
2、设置一个图片框和三个命令按钮，将图片框的名称改为A，按钮的caption改为sina，cos，tan.
3、点击sina进入，输入，可以不设窗体变量。x=30A.print sin(x*3.14159/180)
4、点击cos进入，输入代码，x=30A.print cos(x*3.14159/180)
5、点击tan进入，输进，x=30A.print tan(x*3.14159/180)
6、解释执行代码，
7、单击sina，cos，tan，
8、这就可以用VB显示各函数的值了，当然只是一个近似值，因为圆周率本身就是一个无限不重复的小数。
