摘要:
'经纬度的十进制转换unction zbzh(x As String) As StringDim k As Stringk = Int(x) + Int((x - Int(x)) * 100) / 60 + Int((x * 100 - Int(x * 100)) * 100) / 3600zbzh = kEnd Function Private Sub UIButtonControl2_Cli... 阅读全文
posted @ 2007-01-10 11:53 疯狂大师 阅读(181) 评论(0) 推荐(0) 编辑