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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كود نسخ السطر او الكتابة الى ليست فيو (/showthread.php?tid=26265)



كود نسخ السطر او الكتابة الى ليست فيو - aldery - 28-08-18

سلام عليكم : اخواني احتاج كود لما بعمل نسخ يضيف الشيء المنسوخ الى ليست فيو و لما بنسخ شي ثاني ينسخه بسطر جديد ليس بنفس السطر وشكراَ للجميع


RE: كود نسخ السطر او الكتابة الى ليست فيو - عابر سبيل 2 - 28-08-18

(28-08-18, 06:44 PM)aldery كتب : سلام عليكم : اخواني احتاج كود لما بعمل نسخ يضيف الشيء المنسوخ الى ليست فيو و لما بنسخ شي ثاني ينسخه بسطر جديد ليس بنفس السطر وشكراَ للجميع


استخدم هذا الكود في زر
PHP كود :
If Clipboard.ContainsText Then Me.ListBox1.Items.Add(Clipboard.GetText



RE: كود نسخ السطر او الكتابة الى ليست فيو - aldery - 28-08-18

(28-08-18, 07:10 PM)عابر سبيل 2 كتب :
(28-08-18, 06:44 PM)aldery كتب : سلام عليكم : اخواني احتاج كود لما بعمل نسخ يضيف الشيء المنسوخ الى ليست فيو و لما بنسخ شي ثاني ينسخه بسطر جديد ليس بنفس السطر وشكراَ للجميع


استخدم هذا الكود في زر
PHP كود :
If Clipboard.ContainsText Then Me.ListBox1.Items.Add(Clipboard.GetText

مشكور أخي بارك الله فيك  Heart


RE: كود نسخ السطر او الكتابة الى ليست فيو - عابر سبيل 2 - 28-08-18

وهذا الكود أفضل، لأنه يظهر السطر المضاف أخيراً
PHP كود :
If Clipboard.ContainsText Then
    Me
.ListBox1.Items.Add(Clipboard.GetText)
 
   Me.ListBox1.SelectedIndex Me.ListBox1.Items.Count 1
End 
If 



RE: كود نسخ السطر او الكتابة الى ليست فيو - elgokr - 30-08-18

الاخ عابر سبيل 2 
لم يقصر فى تقديم المساعدة

فتحياتى له ولك
وتمنياتى لكم التوفيق



RE: كود نسخ السطر او الكتابة الى ليست فيو - aldery - 30-08-18

(28-08-18, 09:05 PM)عابر سبيل 2 كتب :
وهذا الكود أفضل، لأنه يظهر السطر المضاف أخيراً
PHP كود :
If Clipboard.ContainsText Then
    Me
.ListBox1.Items.Add(Clipboard.GetText)
 
   Me.ListBox1.SelectedIndex Me.ListBox1.Items.Count 1
End 
If 

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