قم بعمل مشروع في الفيجوال بيسك 6.0 و ضع زر اسمه Command1 و مربع نص اسمه Text1
ثم ضع الكود التالي
Private Sub Command1_Click() Clipboard.Clear Clipboard.SetText Text1.SelText End Sub
ثم قم بحفظه
قم بفتح الفيجوال ستديو .نيت
File ==> Open ==> Convert
قم بتحويله إلى فيجوال بيسك .نيت
و لاحظ بنفسك هل تمت العملية بنجاح ؟؟؟
<_< :wacko:
