منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
طلب كود - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : طلب كود (/showthread.php?tid=41627)

طلب كود - نهى علي - 04-06-22

السلام عليكم 
الاساتذه الكرام
احتاج الى كود كالتالي 
إذا أدخلت رقم معين في تيكست يظهر في تيكست اخر رقم ١ واذا
كررت الرقم في التكست الاول يعطيني التكست الثاني رقم اثنين وهكذا  كلما كررنا الرقم يعطي التكست الثاني رقم التكرار
ارجوا المساعده في ذلك

RE: طلب كود - نهى علي - 05-06-22

السلام عليكم
هل من جواب استاذتي الكرام

RE: طلب كود - الاصيله - 07-06-22

(05-06-22, 02:27 AM)نهى علي كتب : السلام عليكم
هل من جواب استاذتي الكرام
وعليكم اسلام
اهلا اختي نهى
اليك هذا الكود مثلما طلبتي
ضعي هذا الكود كما هو للتيكست الاول 


كود :
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If Text1.Text > 0 Then
Text2.Text = Val(Text2.Text) + Val(1)
  End If
End If
End Sub


RE: طلب كود - نهى علي - 07-06-22

شكراً لك من كل قلبي لقد تم تجربته وهذا هو المطلوب
جعله الله في ميزان حسناتك