الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مشكلة في برنامج بسيط

بدأه العميد ريان في 11 أكتوبر 2010 · 6 رد · 629 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم.. عندي سؤال في الفيجوال بيزك 2008 .. طبعا أنا لساتي مبتدأ

عملت برنامج بسيط بـ 2 Label و 2 TexetBox و 1 Button والصورة توضح :

12867376611.png

أريد من البرنامج عند الضغط على زر " نسـخ " ينسخ النص المحدد سواء كان في الـ Label الأول أو الثاني ويلصقه في الـ Label الآخر

وهذا الكود البسيط الخاص بالزر " نسخ " :

If TextBox1.SelectionLength > 0 Then

TextBox2.SelectedText = TextBox1.SelectedText

End If

If TextBox2.SelectionLength > 0 Then

TextBox2.SelectedText = TextBox1.SelectedText

End If

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

هل من حل لمشكلتي الغبية والبسيطة

#2

بعد عملية النسخ

TextBox2.SelectedText=""

#3
بهاء صلاح الدين فراج كتب:

بعد عملية النسخ

TextBox2.SelectedText=""

هذي تخلي العملية عملية قص وليست نسخ !

#4 
 If TextBox1.Text <> " " Then
TextBox2.Text = TextBox1.Text
TextBox1.Clear()

والثاني نفس الشيء

في اكثر من طريقه مثل 

textbox.copy()

textbox.paste()

او بتقدر تستخدم Clipboard

تم تعديل هذه المشاركة بواسطة ( HASSAN ) في 12 أكتوبر 2010 في 20:14

1
#5

السبب في ذلك ان النص ما زال في الحافظه (clipboard) ولحذف النص من الحافظه ضع هذا الكود في آخر الكود تبعك :

my.clipoard.Clear

لكني لست متأكد من كلمة Clear لاني الان على اللينكس ولكن جرب اكتب my.clipoard.c وسوف تظهر لك الخيارات ولكن في الاغلب Clear

اتمنى ان يعمل معك ان لم يعمل اخبرني

2
#6
Black Spider كتب:

السبب في ذلك ان النص ما زال في الحافظه (clipboard) ولحذف النص من الحافظه ضع هذا الكود في آخر الكود تبعك :

my.clipoard.Clear

لكني لست متأكد من كلمة Clear لاني الان على اللينكس ولكن جرب اكتب my.clipoard.c وسوف تظهر لك الخيارات ولكن في الاغلب Clear

اتمنى ان يعمل معك ان لم يعمل اخبرني

طريقتك نفعت والكود الصح هو Clipboard.Clear()

مشكور اخوي على المساعدة

#7

العفو وبالتوفيق

مواضيع مشابهة