谁能把这段vb代码改成java代码
IfGetSiteInfo(RsTmp,Me.BusNo)ThenIfNotRsTmp.EOFThenLng=RsTmp("Lng")Lat=RsTmp("Lat")Ve...
If GetSiteInfo(RsTmp, Me.BusNo) Then
If Not RsTmp.EOF Then
Lng = RsTmp("Lng")
Lat = RsTmp("Lat")
Velocity = RsTmp("Velocity")
Orientation = RsTmp("Orientation")
SiteTime = Format(RsTmp("Site_Time"), "yyyymmddhhmmss")
GetSign = True
End If
End If 展开
If Not RsTmp.EOF Then
Lng = RsTmp("Lng")
Lat = RsTmp("Lat")
Velocity = RsTmp("Velocity")
Orientation = RsTmp("Orientation")
SiteTime = Format(RsTmp("Site_Time"), "yyyymmddhhmmss")
GetSign = True
End If
End If 展开
2个回答
展开全部
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询