Fix degree symbol in dd2dms and UTF-8 issue

icarda-git · Feb 9, 2021 · a438f17 · a438f17
1 parent 59517f8
commit a438f17
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/ICARDA_VBA_Toolkit.bas b/ICARDA_VBA_Toolkit.bas
@@ -151,7 +151,7 @@ Public Function DD2DMS(decStr As String) As Variant
     Seconds = Round((((decStr - Degrees) * 60) - Minutes) * 60, 4)
 
     outStr = ""
-    If (Degrees > 0) Then outStr = Degrees & "°"
+    If (Degrees > 0) Then outStr = Degrees & Chr(176)
 
     If (Minutes >= 10) Then
         outStr = outStr & Minutes & "'"