کد مربوط به منوی Edit\Copy

[SYSMAN]

چه کدی باید برای منوی Edit\Copy نوشته بشه تا عمل فشار دادن کلیدهای Ctrl+C رو شبیه سازی کنه؟

[sadegi]

این کد قسمتی از کلمات موجود در ریچ تکست باکس رو که انتخاب شده رو تو حافظه کپی میکنه
Clipboard.SetText RichTextBox1.SelText, vbCFRTF

[sadegi]

البته یادم رفت بگم که اگه میخواید از تصویر کپی بگیرید باید به جای
SetText از SetData استفاده کنید

[SYSMAN]

ممنون ولی من می خوام دقیقا مثل Edit\Copy عمل کنه چون مشخص نیست که کاربر چه چیزی رو انتخاب می کنه، منظورم این هست که اگه کاربر Edit\Copy رو انتخاب کرد زدن کلیدهای Ctrl+C انجام بشه.

[dr_g]

باسلام
دوست عزیز برای اینکه مشخص بشه کاربر متنی رو انتخاب کرده یا نه می توونی از کد زیر استفاده کنی

()Private Sub RichTextBox1_SelChange
If RichTextBox1.SelLength > 0 Then
MnuCopy.Enabled = True
Else
MnuCopy.Enabled= False
End If
End Sub

که اگر قسمتی از متن انتخاب شود منوی کپی فعال و در غیر این صورت غیر فعال می شود