چينش اشتباه حروف فارسي و اعداد انگليسي در يك رشته

[iman_22a]

با سلام خدمت اساتيد محترم

قصد دارم براي بخش پرداخت گروهي از طريق شبا يك فايل متني دسته اي درست كنم . اين فايل از فرمت مشخصي پيروي ميكنه . فرمت مورد نظر به ترتيب "شناسه شبا،مبلغ،نام،نام خانوادگي،توضيحات" هست.
اطلاعات را از طريق گريد جانوس مطابق كدهاي زير خوندم و از طريق StremWriter توي يك فايل متني با كدينگ UTF8 نوشتم . متاسفانه ترتيب ايجاد شده با ترتيب مثال بانك فرق ميكنه و اين فايل رو معتبر نميدونه.


Dim rows() As Janus.Windows.GridEX.GridEXRow = GridEX1.GetRows()

Dim list As ArrayList = New ArrayList()
For Each row As Janus.Windows.GridEX.GridEXRow In rows
list.Add(CType(CType(row.DataRow, DataRowView).Row, dsLocal.Localdb).Shaba & "," & CType(CType(row.DataRow, DataRowView).Row, dsLocal.Localdb).Mablagh & "," & CType(CType(row.DataRow, DataRowView).Row, dsLocal.Localdb).AccFirstName & "," & CType(CType(row.DataRow, DataRowView).Row, dsLocal.Localdb).AccFamily & "," & CType(CType(row.DataRow, DataRowView).Row, dsLocal.Localdb).BarNo)
Next

Using sw As New IO.StreamWriter(String.Format("c:\Gts_PayList_{0}.txt", fdt.To_Hejri(Now, True).ToString.Replace("/", "")), False, Encoding.UTF8)
For Each a As Object() In list2
sw.WriteLine(a)
Next
End Using



File output Content :
780190000000212962159003,4008400,عباس,شعبا ني صفي آبادي,,
820150000000776800092011,7322000,سعيد,ربيع ي شور جستاني,,


نمونه فرمت بانك رو هم ضميمه كردم . همونطور كه ميبينين ترتيب چينش عوض ميشه حتي قبل از اينكه توي فايل متني نوشته بشه ...
از دوستاني كه وقت ميگذارن پيشاپيش ممنونم ...