在“计算”按钮的单击事件中加入如下代码:
dim Bj as long =inputbox("请输入圆的半径:")
text1.text=bj
text2.text=3.14*(bj^2)
'S=4*pi*(R^2) S 表面积 pi 圆周率 R圆直径
text3.text=4*3.14*((2*bj)^2)
'V=4/3*pi*(R^3) V 体积 pi 圆周率 R圆直径
text4.text=4/3*3.14*((2*bj)^3)
import java.util.Scanner;
public class Test {
public static void main(String agrs[])
{
Scanner a=new Scanner(System.in);
System.out.println("请输入圆的半径");
int r=Integer.parseInt(a.next());
System.out.println("圆的周长是: "+ 2*Math.PI*r); // 公式 2*π*r
System.out.println("圆的面积是: "+ Math.PI*r*r); // 公式 π*r^2
System.out.println("圆的面积是: "+ 4*Math.PI*r*r); //公式 4*π*r^2
System.out.println("圆的体积是: "+ 4/3*Math.PI*r*r*r); //公式 4/3*π*r^3
}
}
我学VB多年了,如果不借助厂家的驱动也处理不了USB口的数据,USB口数据很难处理的!
我也有航模,航模遥控器一般都有一个外接口,是输出信号的,买一个模拟器(便宜的有28元),可以把遥控器的控制脉冲串输入USB口,在电脑上模拟操作,操作熟练了再出去飞,才能保证少炸机。
貌似没有电脑通过USB口控制遥控器的功能,VB的处理速度,好像满足不了航模的需要,你自己DIY试试。
嗯因该 R来表示
带入公式算