VB程序设计教程第3版课后实验答案

B．2 输入半径 计算圆的周长面积Private Sub Command1_Click() Label2 = Format(Val(Text1) * Val(Text1) * 3.14, "0.0