تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
النسخ ، القص ، واللصق للنصوص
#1
كاتب الموضوع : AhmedEssawy

بفرض أن لدينا Text1 وهو المكان الذي فيه النص ، فإننا سوف نستخدم Clipboard وتحديداً SetText لنقل النصوص ، وفي حالة القص سنقوم اضافة لذلك بمسح النص المحدد ، وأخيراً في حالة اللصق سوف نستخدم GetText .


كود :
============================================
'copy
Private Sub command1_Click()
Clipboard.Clear
Clipboard.SetText text1.SelText
End Sub
============================================
'cut
Private Sub command2_Click()
Clipboard.Clear
Clipboard.SetText text1.SelText
text1.SelText = ""
End Sub
============================================
'paste
Private Sub command3_Click()
text1.SelText = Clipboard.GetText()
End Sub
============================================
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة استخدام SendKey لتطبيق اوامر التراجع والقص والنسخ واللصق RaggiTech 0 626 17-10-12, 12:44 AM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم