01-11-20, 10:39 PM
(01-11-20, 06:48 AM)سعود كتب : وعليكم السلام ورحمة الله وبركاته
اذا انت مصمم على الفكرة هذي فقد اجهز مثال ان فهمتك بشكل صحيح.
اما لو احببت اي فكرة بالموضوع
#14
او اذا مستعجل على التجربة نفس الفكرة
صفحة تشفير و فك تشفير الحروف العربية بشكل مباشر
اعني نفس الفكرة نعمل قائمتين من الحروف
ا ب ت ث ج ح خ
والاخرى العكس بكود يعكس القائمة الاولى
اكيد انك فهمت فكرتي.
على السريع فكرة حسب المطلوب توجد قائمة بالحروف وقائمة بالارقامPHP كود :
Public Class Form1
Dim lst1 As String = "ابتثجحخدذرزسشصضطظعغفقكلمنهوي"
Dim lst2() As String = "0;1;2;3;4;5;6;7;8;9;10;11;12;13;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28".Split(";")
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim txt As String = ""
txt = TextBox1.Text
TextBox1.Clear()
Dim n As String = ""
For Each h As String In txt
If lst1.Contains(h) Then
n &= lst2(lst1.IndexOf(h)) & " "
Else
n &= h
End If
Next
TextBox1.Text = n
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim txt As String = ""
txt = TextBox1.Text
TextBox1.Clear()
Dim n As String = ""
For Each h As String In txt.Split(" ")
If lst2.Contains(h) Then
n &= lst1(lst2(h))
Else
n &= h
End If
Next
TextBox1.Text = n
End Sub
End Class
الدنيا تمام معيا هنا في الكود دا ربنا يجازيك خير
لكن هل في طريقة بقا اجمع بيها الناتج
يعني
1 10 3 9 = 23
إِنْ يَنْصُرْكُمُ اللَّهُ فَلَا غَالِبَ لَكُمْ وَإِنْ يَخْذُلْكُمْ فَمَنْ ذَا الَّذِي يَنْصُرُكُمْ مِنْ بَعْدِهِ وَعَلَى اللَّهِ فَلْيَتَوَكَّلِ الْمُؤْمِنُونَ
لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ
لَيْسَ لَهَا مِنْ دُونِ اللَّهِ كَاشِفَةٌ
