contacts export and edit

This commit is contained in:
sShemet
2026-02-01 21:51:44 +05:00
parent e8f00fef4d
commit f3c41f2781
6 changed files with 37 additions and 12 deletions

View File

@@ -980,7 +980,9 @@ endlineTest:
For Each b In fileHeader
retString &= $"[" & b.ToString("X4") & "]"
Next
retString = retString.Substring(0, retString.Length - 1) & vbCrLf
'retString = retString.Substring(0, retString.Length - 1) & vbCrLf
retString &= vbCrLf
For a = 0 To japPointers.Count - 1
retString &= engText(a) & vbCrLf