问题标题:
VB6.0计算圆的周长公式题目是这样的.如果要计算半径为1000米的圆的周长,请问程序代码是什麼?
问题描述:
VB6.0计算圆的周长公式
题目是这样的.如果要计算半径为1000米的圆的周长,请问程序代码是什麼?
郭广雄回答:
PrivateSubCommand1_Click()
DimpiAsDouble
DimrAsDouble
DimlAsDouble
pi=4*Atn(1)
r=1000
l=2*pi*r
Print"周长为:",l
EndSub
查看更多