تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مساعدة في كود تشفير
#1
السلام عليكم ورحمة الله


كيف الحال؟ عساكم بخير




ممكن اي شخص يشرحلي عمل كل كود ؟ وعمل كل سطر موجود ؟

PHP كود :
Private Sub Command1_Click()
   Text2.Text Encrypt(Text1.TextLen(Text1.Text))
End Sub
 
Public Function Encrypt(Name As StringKey As Long) As String
Dim v 
As Longc1 As StringAs String
   For v 
1 To Len(Name)
       c1 Asc(Mid(Namev1))
       c1 Chr(c1 Key)
       z c1
   Next v
   Encrypt 
z
End 
Function 

جزيل الشكر
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] ممكن مساعدة في ايجاد كود او اداة لاظهار جدول في واجهة البرنامج مبرمج جديد 2 100 09-11-16, 03:48 AM
آخر رد: مبرمج جديد
  [vb6.0] مساعدة عاجلة من الاخوة الكرام (ادارج صورة من فيجوال بيسك الى ملف وورد) sher 1 225 08-11-16, 02:32 AM
آخر رد: AL_BRNS
  مساعدة فى عمل برنامج بسيط hithemlion 23 605 27-09-16, 05:22 PM
آخر رد: Amir_alzubidy
  مساعدة في Active report haiderkh 4 180 31-08-16, 12:08 AM
آخر رد: Ahmed_Mansoor
  مساعدة في كود بحث Microsoft Visual Basic 6.0 2 151 24-07-16, 06:14 PM
آخر رد: Microsoft Visual Basic 6.0
  مساعدة text مربوطة بقاعدة بيانات mohfar 2 137 14-07-16, 09:46 PM
آخر رد: Amir_alzubidy
  مساعدة في كود الطباعة Mo_rb 5 264 07-07-16, 06:17 PM
آخر رد: Amir_alzubidy
  [ تمّ الحل ] مساعدة برسائل تنبيهيّة خاصّة عبد العزيز البسكري 5 184 19-06-16, 04:16 AM
آخر رد: Amir_alzubidy
  [vb6.0] مساعدة في رفع قاعدة برنامج vb6 والبحث بالنت fahad fbs 0 149 14-06-16, 03:59 PM
آخر رد: fahad fbs
  [vb6.0] مساعدة في تعديل كود مقارنة أرقام ثم وضعها في لست بوكس asto 1 117 14-06-16, 08:00 AM
آخر رد: Ahmed_Mansoor

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم