السلام عليكم
لو سمحتم
ظهرت لى هذة المشكلة
Conversion from string "" to type 'Double' is not valid.
فى مربع حوارى
وذلك بسبب اننى لدى تيكست بوكس به "D1" واريد اضافة رقم 1 الية ليصبح "D2" داخل التيكست
فكتبت TXT1.text=TXT1.text + 1
فظهرت لى تلك المشكلة
وعليكم السلام ورحمة الله وبركاته
--
- لا يمكنك جمع رقم مع نص.
- جمع الارقام معروف -- ولكن جمع النصوص هي عملة إلحاق نص بنص اخر لينتج نص جديد مكون من النصين السابقين (وليست عملية جمع بل تلاصق أو توصيل-سمها كما شئت).
--
عليك تعلم أساسيات لغة البرمجة بدءا من أصغر معلومة فيها
قد تضيع عليها شهر أو شهرين من التعلم بمعدل ساعة يومياً (ولكن في الحقيقة أنت لا تصيع وقتاً بل تبني أساساً متيناً وقاعدة أساسية تستند عليها طول حياتك البرمجية في هذه اللغة أو غيرها من اللغات التي قد تريد تعلمها مستقبلاً).
في حال أتقنت الاساسيات : ستعرف كيف تجعل الكود عندك يسلسل المعرف الذي تريده من D1 --> D2 -->-->------> Dn
وعليكم السلام ورحمة الله وبركاته
ضع الكود التالي في زر Button
واكتب D1 هذا في صندوق النص TextBox
* أو قم بتحميل المشروع المرفق .
واعطني النتيجة !
كود :
Dim txt As String = TextBox1.Text
Dim Number As Byte = 0
Dim Litter As String = ""
Litter = txt.Substring(0, 1)
txt = txt.Substring(1, 1)
txt = txt + 1
TextBox1.Text = Litter & txt
تحايل على قوانينها باجراء من عندك.
أستاذي التحايل أحيانا مطلوب للخروج من أي مأزق برمجي
طبعا هذي ليست معادلة
فقط التلاعب بمربع النص
جزاكم الله خيرا
وجعله فى ميزان حسانتكم
جميع المشاركات والنصائح افادتنى ولكم جزييييييييييل الشكر
بارك الله فيك أخي حماده
تمنياتي لك بالتوفيق في مشروعك ؟
سبحان الله مع اني لم اقصد ان اجهز هذا المثال بهذه الصورة الا اني لم اعمل مثله قط فيما يخص الالة الحاسبة لو تشوفون الامثلة السابقة للالة الحاسبة اللتي عملتها وقارنتوها بهذه لوجدتم هذه اقواها [طبعا كاساسيات و ليست متقدمة]
(22-07-22, 05:20 PM)سعود كتب : [ -> ]
طبعا هذي ليست معادلة
فقط التلاعب بمربع النص
يا سلام على الإبداع
أرجوك خف علينا شويه
ما نتحمل المفاجآت الحلوة 
* بس توجد ملاحظة أستاذ سعود
زر الرقم ( 9 ) ما يشتغل (زعلان 
)
