26-07-13, 07:25 PM
اريد ان اجعل الزر ينسخ ماداخل البل 1
ممكن الكود
ممكن الكود
نسخ ماداخل البل
|
26-07-13, 07:25 PM
اريد ان اجعل الزر ينسخ ماداخل البل 1
ممكن الكود
26-07-13, 07:47 PM
هذا الكود منقول من المنتدي ولكني نسيت من أية قسم أو موضوع.
============================================ '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 ============================================
26-07-13, 07:49 PM
ممكن لليبلل تعمل نقل للكابشن تبعه في تيكست ثم تطبق الكود السابق علي التيكست
26-07-13, 07:57 PM
(آخر تعديل لهذه المشاركة : 26-07-13, 08:01 PM {2} بواسطة moh_saed35.)
تفضل اخي الكريم
هاذا مثال لنسخ محتوى اليبل تحياتي
26-07-13, 08:02 PM
واذا كان قصدك نقل من اليبل الى اتكست ستخدم هاذا
Text1.Text = Label1.Caption |
|