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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : تعديل على الكود جزاكم الله الجنه (/showthread.php?tid=9246)

الصفحات: 1 2

تعديل على الكود جزاكم الله الجنه - محمود اكرم - 13-06-13

السلام عليكم
اخ samee119485r
ما هذه المتغيرات

إقتباس : For N = 1 To aCols
Str_PrevCols = Str_PrevCols & Mid$(aChars, aIndex(N), 1)
Next


تعديل على الكود جزاكم الله الجنه - samee119485r - 13-06-13

اخي محمود اكرم

والله لا اعلم


هاذا الكود اختة من الاخ VB_Coder

جزاه الله خير

تعديل على الكود جزاكم الله الجنه - محمود اكرم - 13-06-13

اقرا رسالتي من التنبيهات

تعديل على الكود جزاكم الله الجنه - VB_Coder - 14-06-13

السلام عليكم

- هذا المثال بعد تعديله , بما أنني الذي عملت الكود فلابد لأي شخص يريد المساعدة أن يفهم الكود أولا وذلك قد يستغرق بعض الوقت , فلذلك لإختصار الوقت عملت التعديل .

- تحياتي .

تعديل على الكود جزاكم الله الجنه - samee119485r - 14-06-13

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

والله لا اعلم كيف اشكرك اخي VB_Coder

بارك الله في علمك

وجزاك الله كل خير

تعديل على الكود جزاكم الله الجنه - محمود اكرم - 14-06-13

السلام عليكم
طلبك هذا اما عن كيف تجعله يكمل من مما بدا فلا اعرف ما فائدة المتغيرات


إقتباس :Private Sub Command2_Click()
SaveSetting App.Title, "Settings", "SaveInText1", Text1.Text
End Sub


Private Sub Form_Load()
Text1.Text = GetSetting(App.Title, "Settings", "SaveInText1")
End Sub


تعديل على الكود جزاكم الله الجنه - samee119485r - 14-06-13

السلام عليكم

اخي محمود اكرم بارك الله فيك

وشكرا لك على متابعة موضوعي وعلى مساعدتك لي

لقد نحلت المشكله

وجزاك الله كل خير