你先新建一个表单，在上面添加一个文本框，再在上面添加一个选择按钮组，在属性窗口设置buttoncount属性值为2，然后双击这个选项按钮组，打开它的click代码窗口，输入代码程序
r=val(allt(thisform.text1.value))
if this.value=1
s=pi()*r^2
messagebox("圆的面积是:"+str(s))
else
s=2*pi*r
messagebox("圆的周长是:"+str(s))
endif
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024