VB程序 设计程序模拟行星运动.太阳和行星轨道用Circle语句完成,行星在轨道上运动的椭圆方程为:x=rx*cos(alfa),y=ry*sin(alfa)其中,rx为椭圆x轴上的半径,ry为y 轴上的半径,alfa为圆心角. 希望高手帮

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/25 21:53:27
VB程序 设计程序模拟行星运动.太阳和行星轨道用Circle语句完成,行星在轨道上运动的椭圆方程为:x=rx*cos(alfa),y=ry*sin(alfa)其中,rx为椭圆x轴上的半径,ry为y 轴上的半径,alfa为圆心角.   希望高手帮
xQkPǿy[[CL' ڂv N_Ge3&&ɣ:l+sH 8YPZkLo>fKO9i*g=* p[=5~pA>]gwޑUPQ- k(p DN%wܳn/Ȝ~c+DQ7b!9;섡hA_wZ6hĐXMj6i;){;5q2RwTqZC~}v /`~4pkq$v,,gRo$k ./YzI)mSô5q`(RB梬ED$呲-2౎J˺߬6Hü s:>H䚣Hm0L ".0J57,SEZ9{#q^T$2.ٛ=Gt| 5=80u O5SQd)υ j-$$ȕM9(%|N3e-5G:ĎUYDrcG6f#7ʪF$dЩ8@Q4%cH

VB程序 设计程序模拟行星运动.太阳和行星轨道用Circle语句完成,行星在轨道上运动的椭圆方程为:x=rx*cos(alfa),y=ry*sin(alfa)其中,rx为椭圆x轴上的半径,ry为y 轴上的半径,alfa为圆心角. 希望高手帮
VB程序 设计程序模拟行星运动.太阳和行星轨道用Circle语句完成,行星在轨道上运动的椭圆方程为:
x=rx*cos(alfa),y=ry*sin(alfa)
其中,rx为椭圆x轴上的半径,ry为y 轴上的半径,alfa为圆心角.
希望高手帮忙解答,高分

VB程序 设计程序模拟行星运动.太阳和行星轨道用Circle语句完成,行星在轨道上运动的椭圆方程为:x=rx*cos(alfa),y=ry*sin(alfa)其中,rx为椭圆x轴上的半径,ry为y 轴上的半径,alfa为圆心角. 希望高手帮
Const PI = 3.14159
Dim alfa As Single
Dim x As Single, y As Single, rx As Single, ry As Single
Dim cenx As Single, ceny As Single
Private Sub Form_Load()
cenx = 2000 '绘图中心
ceny = 1600
alfa = 0
rx = 1500 'x轴半径
ry = 900 'y轴半径
Do
alfa = alfa + 0.1
x = rx * Cos(alfa)
y = ry * Sin(alfa)
Me.PSet (x + cenx, y + ceny) '点绘
Loop Until alfa >= 2 * PI
Me.Picture = Me.Image
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
alfa = alfa + 0.1
If alfa >= 2 * PI Then alfa = 0
x = rx * Cos(alfa)
y = ry * Sin(alfa)
Me.Cls
Me.Circle (x + cenx, y + ceny), 120
Me.PSet (x + cenx, y + ceny)

End Sub

VB程序 设计程序模拟行星运动.太阳和行星轨道用Circle语句完成,行星在轨道上运动的椭圆方程为:x=rx*cos(alfa),y=ry*sin(alfa)其中,rx为椭圆x轴上的半径,ry为y 轴上的半径,alfa为圆心角. 希望高手帮 用VB设计一个程序,实现一个圆绕椭圆轨迹运动的动画效果 设计一个VB程序,计算整数各位数上的和 vb公尺转换成英尺设计一个程序实现公尺和英尺之间量度转换. VB在设计程序过程中,Caption是什么意思 VB在设计程序过程中,Caption属性是什么意思 求VB小程序!设计一个VB小程序,给定三角形任意两边的长度,和夹角的度数,求三角形的面积.S=absinα求VB小程序!设计一个VB小程序,给定三角形任意两边的长度,和夹角的度数,求三角形的面积.S=absin VB投硬币程序用VB程序模拟投硬币,当出现连续三次正面则停止.输出每次投掷的结果.提示:可以用0代表正面,1代表反面,0和1随机出现. VB编程:设计一个体操评分程序,20 位评委,除去一个最高分和一个最低分,计算平均分 二、设计简单的VB程序计算函数的值 自己设计一个简单的VB程序,计算下列VB函数的值.提示:为简单起见,可二、设计简单的VB程序计算函数的值自己设计一个简单的VB程序,计算下列VB函数的值. VB程序的fix是什么意思 计算5!+10!VB程序 VB程序Sgn(-5)是什么意思 设计一个程序,在文本框中输入一个3位整数,单击按钮后,在标签上输出该数的百位数、十位数和个位数VB设计 设计一个运算程序 用VB语言设计程序,把一个正整数写成若干个素数相乘的形式. 如何设计用vb语言编写一个程序,输入三个数,输出其中的最大数 谁能帮我用VB设计一个简单的程序:计算正方形的面积(详细点)