www.ctrt.net > 上边的文本框中输入半径然后点击按钮后在下边的文...

上边的文本框中输入半径然后点击按钮后在下边的文...

我帮你改了下, 半径: 结果:

你需要在文本框输入半径,是要图形界面了? 其实用C语言就可以了dos界面输入半径也行啊! #include #define pi 3.1415926535898 int main() { float r; int t; printf("输入半径:"); scanf("%f",&r); printf("请输入选择:1、求面积 2、求周长"...

①方法1: Private Sub Command1_Click() Dim p As Single Dim s As Single Dim r As Single p = 3.1415 '定义PAI的值 r = Val(Text1) s = p * r ^ 2 '面积公式 c = 2 * p * r '周长公式 Label2.Caption = c '标签2输出周长结果 Text2 = s '文本...

Private Sub Command1_Click() Dim pi As Double pi = 3.1415629 Dim s As Double Dim l As Double Dim r As Double r = Val(Text1.Text) s = pi * r * r l = 2 * pi * r Print " 面积= " & s Print "周长= " & l End Sub

Private Sub Command1_Click() If Not IsNumeric(Text1) Then MsgBox "xxx" Text1.SetFocus Exit Sub End If Dim r As Single r = Val(Text1.Text) Text2.Text = 3.14 * r * r End Sub Private Sub Command2_Click() If Not IsNumeric(Text2) Th...

1、新建一个图层; 2、执行“滤镜——锐化——智能锐化”命令; 3、在弹出的窗口中,在“数量”文本框里输入46、在“半径”文本框里输入0.8、在“移去”文本框里点击下拉箭头,选择“高斯模糊”。 4、还有一个忘记了,在“设置”文本框里点击下拉箭头,选择“默认...

假设输入框是 textBox1 int c = 0; int.TryParse(textBox1.Text, out c); if (c > 0) textBox1.Text = (2 * Math.PI * c).ToString();

你把整个画布都填充了,这样不也等于填充了圆么?还有你的paint方法里面如果要填充圆应该是fillOval,但是在这之前又不设置颜色,在之后设置灰色是没用的。总而言之,不太明白你的意思,就根据题目需求自己写了一点,题目对坐标没有要求,所以我...

定义一个变体 GETOBJECT得到一个实体 检查得到的实体是否是圆 如果是圆,则取其两个属必_-圆心坐标与半径

Private Sub Command1_Click() r = Val(Text1.Text) Pi = 3.1415926 L = 2 * Pi * r s = L * r / 2 Label1.Caption = "圆周长=" & L & vbCrLf & "圆面积=" & s End Sub

网站地图

All rights reserved Powered by www.ctrt.net

copyright ©right 2010-2021。
www.ctrt.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com