التواصل المباشر مع الادارة والاعضاء القدامى من خلال قناة التلغرام



العودة   :: vBspiders Professional Network :: > [ ::. قسم البرمجة ولغاتها .:: ] > قسم البرمجة الكائنية

إضافة رد
 
LinkBack أدوات الموضوع انواع عرض الموضوع
قديم 06-05-2011, 01:23 PM   رقم المشاركة : 1 (permalink)
معلومات العضو
MazMaz

VBSPIDERS TEAM

 
الصورة الرمزية MazMaz
 

 

 
إحصائية العضو








MazMaz غير متواجد حالياً

إرسال رسالة عبر MSN إلى MazMaz

 

 

إحصائية الترشيح

عدد النقاط : 10
MazMaz is on a distinguished road

افتراضي كود vb6


السلام عليكم و رحمة الله و بركاته

اقدم لكم اليوم كود لتصميم برنامج تشفير و فك تشفير بلغة فيجوال بيسك


تفضلو



كود:
Private Sub Command1_Click()
Dim encrypt
encrypt = ""
ch = Len(Text1)
For i = 1 To ch
letter = Mid(Text1, i, 1)
encrypt = encrypt & Chr(Asc(letter) + 2)
Next
Text2.Text = encrypt
End Sub

______


command 2 

Private Sub Command2_Click()
Dim encrypt
encrypt = ""
ch = Len(Text2)
For i = 1 To ch
letter = Mid(Text2, i, 1)
encrypt = encrypt & Chr(Asc(letter) - 2)
Next
Text1.Text = encrypt
End Sub

طبعا لازم يكون عندك شوية خبرة بالفيجوال بيسك حتى تعرف تستخدمه

تحياتي و اتمنى الإستفاده



;,] vb6

التوقيع

Mazmaz
--------------

 

   

رد مع اقتباس
قديم 06-05-2011, 09:20 PM   رقم المشاركة : 2 (permalink)
معلومات العضو
 
الصورة الرمزية ChucK NoRRis
 

 

 
إحصائية العضو







ChucK NoRRis غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
ChucK NoRRis is on a distinguished road

افتراضي


تسلم ايديك يا غالي

التوقيع

دخول متقطع مشاكل بالنت

 

   

رد مع اقتباس
قديم 06-05-2011, 09:43 PM   رقم المشاركة : 3 (permalink)
معلومات العضو
 
الصورة الرمزية bleu moon
 

 

 
إحصائية العضو








bleu moon غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 12
bleu moon is on a distinguished road

افتراضي


ممكن تعطينا برنامج الفي بي 6 ؟؟ ههههه بحث عليه بس لقيت النسخه بورتابل تسلم على الكود

   

رد مع اقتباس
قديم 06-05-2011, 11:19 PM   رقم المشاركة : 4 (permalink)
معلومات العضو
 
الصورة الرمزية ChucK NoRRis
 

 

 
إحصائية العضو







ChucK NoRRis غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
ChucK NoRRis is on a distinguished road

افتراضي


اقتباس
مشاهدة المشاركة المشاركة الأصلية كتبت بواسطة nor15din
ممكن تعطينا برنامج الفي بي 6 ؟؟ ههههه بحث عليه بس لقيت النسخه بورتابل تسلم على الكود

راجع هذا الموضوع

الشرح الكامل لتنصيب الفجوال بسيك 6 [visual basic6]

التوقيع

دخول متقطع مشاكل بالنت

 

   

رد مع اقتباس
قديم 06-05-2011, 11:58 PM   رقم المشاركة : 5 (permalink)
معلومات العضو
 
الصورة الرمزية bleu moon
 

 

 
إحصائية العضو








bleu moon غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 12
bleu moon is on a distinguished road

افتراضي


اقتباس
مشاهدة المشاركة المشاركة الأصلية كتبت بواسطة ChucK NoRRis
راجع هذا الموضوع

الشرح الكامل لتنصيب الفجوال بسيك 6 [visual basic6]

:coool:

احتراماتي لك :coool:

   

رد مع اقتباس
قديم 06-07-2011, 03:12 PM   رقم المشاركة : 6 (permalink)
معلومات العضو
MazMaz

VBSPIDERS TEAM

 
الصورة الرمزية MazMaz
 

 

 
إحصائية العضو








MazMaz غير متواجد حالياً

إرسال رسالة عبر MSN إلى MazMaz

 

 

إحصائية الترشيح

عدد النقاط : 10
MazMaz is on a distinguished road

افتراضي


شكرا عالردود شباب

التوقيع

Mazmaz
--------------

 

   

رد مع اقتباس
إضافة رد

مواقع النشر (المفضلة)


تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة
Trackbacks are متاحة
Pingbacks are متاحة
Refbacks are متاحة

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


الساعة الآن 08:54 PM


[ vBspiders.Com Network ]

SEO by vBSEO 3.6.0