04-08-19, 01:20 AM
السلام عليكم ورحمة الله وبركاته
اخواني الكرام عندي عملتم محاولة لعمل برنامج يحول الحروف من عبي الي فرنسي اشتغل مع حروف واخرى لا مثل التاء المروبطة تطلع غالطة وهذا منطقي
وبعد تفكير لقيت انه افضل حل حتى احصل ما اريد بالظبط هو الكتابة بـ unicode واظن وقتها تكون كل الحروف صحيحة بنسبة عالية
لذا لو تكرمتم سوف اكتب الكود الحالي اللي عندي ويا ريت احد اخوة يجود عليا بكتابته الصحيحة ولكم كل الشكر .
الكود :
====================
===================
في ما يخص باقي الحروف سوف اضيفهم فيما بعد حصولي على الكود الصحيح
وشكرا للجميع
اخواني الكرام عندي عملتم محاولة لعمل برنامج يحول الحروف من عبي الي فرنسي اشتغل مع حروف واخرى لا مثل التاء المروبطة تطلع غالطة وهذا منطقي
وبعد تفكير لقيت انه افضل حل حتى احصل ما اريد بالظبط هو الكتابة بـ unicode واظن وقتها تكون كل الحروف صحيحة بنسبة عالية
لذا لو تكرمتم سوف اكتب الكود الحالي اللي عندي ويا ريت احد اخوة يجود عليا بكتابته الصحيحة ولكم كل الشكر .
الكود :
====================
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If RadioButton1.Checked Then
Dim txt As String = TextBox1.Text
txt = txt.Replace("ا", "a")
txt = txt.Replace("ب", "b")
txt = txt.Replace("ت", "t")
TextBox2.Text = txt
End If
If RadioButton2.Checked Then
Dim txt As String = TextBox1.Text
txt = txt.Replace("a", "ا")
txt = txt.Replace("b", "ب")
txt = txt.Replace("t", "ت")
TextBox2.Text = txt
End If
End Sub
End Class
===================
في ما يخص باقي الحروف سوف اضيفهم فيما بعد حصولي على الكود الصحيح
وشكرا للجميع