منتديات التقني عالم التجارة
SPTechs منتديات
 اسم المستخدم حفظ بيانات الدخول 
كلمة المرور
  منتديات SPTechs   > الحماية
 thread

ما هي معادلة التحويل من النظام الثنائي الى العشري وبالعكس ؟؟ الرجاء الكود اللازم لفعل ذلك عن طريق الفيجول بيسك بأسرع ما يمكن

 

  الأربعاء 22 مايو 2019 م الموافق ‏17/‏رمضان/‏1440 هـ الساعة 6:59

 


الرد على الموضوع عدد القراءات : 4564   

معلومات :   البلد : فلسطين  : المدينة : رام الله
  عدد المشاركات : 8
nasse


[ الجمعة 9 سبتمبر 2005 ]
 
 
 

ما هي معادلة التحويل من النظام الثنائي الى العشري وبالعكس ؟؟ الرجاء الكود اللازم لفعل ذلك عن طريق الفيجول بيسك بأسرع ما يمكن



الرجاء الاسراع في مساعدتي

# 1  
Admin
معلومات :  البلد : سورية  : المدينة : حمص
« مشرف عام »
  عدد المشاركات : 342
Admin

 
[ الجمعة 9 سبتمبر 2005 ]
 
 
 
السلام عليكم :

هذا الكود تضعه في مودل Module

و تضع في الفورم نصين و زرين .

عند النقر على الزر الاول :
text2=BinToDec(text1)
و بالعكس

Public Function BinToDec(Binary As String) As Long
Dim n As Long
Dim s As Integer

For s = 1 To Len(Binary)
n = n + (Mid(Binary, Len(Binary) - s + 1, 1) * (2 ^ (s - 1)))
Next s

BinToDec= n
End Function

Public Function DecToBin(DecimalNum As Long) As String
Dim tmp As String
Dim n As Long

n = DecimalNum

tmp = Trim(Str(n Mod 2))
n = n \ 2

Do While n <> 0
tmp = Trim(Str(n Mod 2)) & tmp
n = n \ 2
Loop

DecToBin= tmp
End Function



اضافة رد على الموضوع




  منتديات SPTechs : مشاركات شبيهة .  لموضوع : ما هي معادلة التحويل من النظام الثنائي الى العشري وبالعكس ؟؟ الرجاء الكود اللازم لفعل ذلك عن طريق الفيجول بيسك بأسرع ما يمكن

   .   الى محبي برنامج شاهد منزلك Google Earth اخيرا الشرح بالصور
   .   شاهد اي مكان من على سطح الكرة الارضية وانت جالس في بيتك
   .   احدث ترددات القنوات الفضائية
   .   تردد جميع قنوات نايل سات غير مشفرة
   .   جديد جميع تردد قنوات النايل سات
   .   صور مضحكة اتمنى ان تنال اعجابكم
   .   ترددات قمر النيل سات
   .   قصة جميلة جدا باللغة الانجليزية مع الترجمة لها
   .   الان أسرار حرامي سيارات سان اندرياس كامله
   .   بنت عمرها 15 سنه بس صايعه..قصه


  منتديات SPTechs : مشاركات Admin  
   .   كيف أستطيع عمل كود و فورم لبرنامج يحول الأرقام من النظام الث
   .   كيف أصمم كود يحول من النظام الثنائي الى النظام العشري و بالع
   .   ما هي طريقةفتح ملف الرد؟؟

  | اتصل مجانا من النت الى الموبايل 100%  |   ارسال رسايل من النت الى الجوال  |