合聚咖

合聚咖

计算两地距离,到底哪里出错了

admin

Private Sub Command3_Click()

Command4.Caption = 2 * 3.14159 * 6358.137 * (Val(Text2) - Val(Text1))

End Sub

另:

Text 文本的意思

Test 测试的意思