已知地球的赤道半径为6378.137千米。假设在赤道上，有两个处于不同经度（单位为度）的城市，用VB编程序求出这两个城市之间的地面距离。
实验要求：
1. 设计合适的运行界面并编写相应的事件代码。
2. 计算结果要有尽可能高的精确度。
参考测试数据：
东经0度，东经90度——10018.75417
东经20.5度，西经36.6度——6356.342924
东经160度，西经170度——3339.584724
界面随意设计，可以计算就OK。
做好打包发送到，[email protected]
Private Sub Command1_Click()
If Text1.Text <> "" Then
a = Val(Text1.Text)
Else
a = -Val(Text2.Text)
End If
If Text3.Text <> "" Then
b = Val(Text3.Text)
Else
b = -Val(Text4.Text)
End If
c = Abs(a - b)
If c > 180 Then c = 360 - c
Text5.Text = c * 2 * 3.1415926 * 6378.137 / 360
End Sub
哥们，你怎么不发我邮箱啊~~ ，你看看现在都160下载量了，回头提交作业跟别人就重复了啊~~，那就再问下，要是想对这个程序的界面进行简单的修改，怎么弄？ 让我稍微改的有一点不一样啊~~
追答那你稍改一下文字，字体啥的。