[moftah70]

(06-02-16, 01:12 PM)hassan كتب : تفضل هاذي فكرتك بالانقليزي

PHP كود :

Public Class Form1
    Dim stringg As String
    Dim q1 As Integer = 1
    Dim w2 As Integer = 2
    Dim e3 As Integer = 3
    Dim r4 As Integer = 4
    Dim t5 As Integer = 5
    Dim y6 As Integer = 6
    Dim U7 As Integer = 7
    Dim I8 As Integer = 8
    Dim O9 As Integer = 9
    Dim P10 As Integer = 10
    Dim a11 As Integer = 11
    Dim s12 As Integer = 12
    Dim d13 As Integer = 13
    Dim f14 As Integer = 14
    Dim g15 As Integer = 15
    Dim h16 As Integer = 16
    Dim j17 As Integer = 17
    Dim k18 As Integer = 18
    Dim l19 As Integer = 19
    Dim z20 As Integer = 20
    Dim x21 As Integer = 21
    Dim c22 As Integer = 22
    Dim v23 As Integer = 23
    Dim b24 As Integer = 24
    Dim n25 As Integer = 25
    Dim m26 As Integer = 26


  
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        For Each aa As String In TextBox1.Text.ToString
            If aa = "q" Then
                TextBox2.SelectedText = q1
            ElseIf aa = "w" Then
                TextBox2.SelectedText = w2
            ElseIf aa = "e" Then
                TextBox2.SelectedText = e3
            ElseIf aa = "r" Then
                TextBox2.SelectedText = r4
            ElseIf aa = "t" Then
                TextBox2.SelectedText = t5
            ElseIf aa = "y" Then
                TextBox2.SelectedText = y6
            ElseIf aa = "U" Then
                TextBox2.SelectedText = U7
            ElseIf aa = "I" Then
                TextBox2.SelectedText = I8
            ElseIf aa = "O" Then
                TextBox2.SelectedText = O9
            ElseIf aa = "P" Then
                TextBox2.SelectedText = P10
            ElseIf aa = "a" Then
                TextBox2.SelectedText = a11
            ElseIf aa = "s" Then
                TextBox2.SelectedText = s12
            ElseIf aa = "d" Then
                TextBox2.SelectedText = d13
            ElseIf aa = "f" Then
                TextBox2.SelectedText = f14
            ElseIf aa = "g" Then
                TextBox2.SelectedText = g15
            ElseIf aa = "h" Then
                TextBox2.SelectedText = h16
            ElseIf aa = "j" Then
                TextBox2.SelectedText = j17
            ElseIf aa = "k" Then
                TextBox2.SelectedText = k18
            ElseIf aa = "l" Then
                TextBox2.SelectedText = l19
            ElseIf aa = "z" Then
                TextBox2.SelectedText = z20
            ElseIf aa = "x" Then
                TextBox2.SelectedText = x21
            ElseIf aa = "c" Then
                TextBox2.SelectedText = c22
            ElseIf aa = "v" Then
                TextBox2.SelectedText = v23
            ElseIf aa = "b" Then
                TextBox2.SelectedText = b24
            ElseIf aa = "n" Then
                TextBox2.SelectedText = n25
            ElseIf aa = "m" Then
                TextBox2.SelectedText = m26
            End If
        Next
    End Sub

    
End Class 


اذا هاذي الطريقه المطلوبه فقط قم بتغيير الاحرف الى عربي

طبعنا في طرق ابصط 

وشكرا

بعد اذن الاخ حسان اعتقد والله اعلم يريدها بهذه الطريقه

تحويل الحروف الي ارقام والعكس طبعاً مجرد تحويل فقط اقصد لا ينفع في حالة تشفير مثلاً بمعنى اذا كتبت اسمك وقمت بتحويله الي ارقام وقمت بوضع نفس الرقم وقمت بتحويله الي حروف لن تجد اسمك

المشروع في المرفقات لتوضيح الفكره