7,785
社区成员




temp.datatype = ((temp.datatype&0x00FF)<<8)+((temp.datatype&0xFF00)>>8);
temp.lg= ((temp.lg&0x000000FF)<<24)+((temp.lg&0x0000FF00)<<8)+((temp.lg&0x00FF0000)>>8)+((temp.lg&0xFF000000)>>24);
temp.lt= ((temp.lt&0x000000FF)<<24)+((temp.lt&0x0000FF00)<<8)+((temp.lt&0x00FF0000)>>8)+((temp.lt&0xFF000000)>>24);
temp.co= ((temp.co&0x00FF)<<8)+((temp.co&0xFF00)>>8);
temp.lsp= ((temp.lsp&0x00FF)<<8)+((temp.lsp&0xFF00)>>8);
Dim strTmp As String
strTmp = Right("000" & Hex(temp.datatype), 4)
temp.datatype = Val("&H" & Right(strTmp, 2) & Left(strTmp, 2))
strTmp = Right("0000000" & Hex(temp.lg), 8)
temp.lg = Val("&H" & Right(strTmp, 2) & Lef(strTmp, 6))
...
temp.datatype = ((temp.datatype And &HFF)* 2^8)+(temp.datatype \ 2^8);
temp.lg= ((temp.lg And &HFF) * 2^24)+((temp.lg And &HFF00)* 2^8)+((temp.lg And &HFF0000)\ 2^8)+((temp.lg \ 2^24);
....
sprintf(cTemp,"%u%02u.%04d",temp.lg/600000, (temp.latitude-(temp.lg/600000)*600000)/10000,temp.lg%10000);