Question

输入半径,用VB编写计算圆面积和圆周长的程序

Answer 1

Private Sub Command1_Click()

Dim bj As Single

Dim zz As Single

Dim mj As Single

bj = CSng(Text1.Text)

If bj