کپی کردن متن به حافظه کلیپبورد

[حبیب]

با سلام خدمت استادان ویژوال بیسیک

من میخواهم یک برنامه بنویسم که کاربر یک کلمه یا عبارتی را که های لایت کرد و ctrl+s را زد آن
متن انتخاب شده به حافظه برود
تاکید میکنم که نمی خواهم از ctrl+c استفاده کنم.

لطفا مرا راهنمایی کنید

با تشکر فراوان
با سلام مجدد : خدمت سروران گرامی عرض کنم که این متن انتخاب شده در تکست باکسهای برنامه من نیست بلکه فرض کنید در برنامه notepad میباشد

[mahdi_farhani]

با استفاده از دستور Clipboard شما میتونید این کار رو بکنید .

[wanener]

فکر کنم اگر درست یادم باشه مثلا اگر بخوای از توی TEXTBOX متنی انتخابی رو بفرستی توی کلیپ برد از دستور (Clipboard.SetText (TextBox1.SelectedTex و تعریف کردن یه شورت کات توی منو به هدفت برسی

[Hossein Bazyan]

دوست عزیز از کد زیر استفاده کن
با زدن کلیدهای Ctrl+S متن موجود در Text1 به کلیپ برد میرود

 

 

private sub Text1_KeyDown ( KeyCode as Integer, Shift as Integer ) 

If KeyCode=83 Then 

Clipborad.Clear 

Clipboard.SetText Text1.Text

Endif

EndSub

[jk]

این دستور
Clipborad
به چه شکل در محیط وی بی فعال می شه .
تو وی بی که امتحان می کنم این دستور برای وی بی ناشناس است.

[mortez maya]

این کدی که نوشتید توی notepad بود یا Textbob؟

[sjj]

Clipboard.SetText "My String"
! به همین سادگی

[oVERfLOW]

البته قبلش باید Clipboard.Clear رو اجرا کنید
چون اگه توی کلیپ بورد چیزی باشه این دستور کار نمی‌کنه..

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

برنامه نویسی‌ش پیچیده هست و به این سادگی‌ها نیست
باید از تابع بازگشت در یک Module کمک بگیرید...

بابای

[samiasoft]

یه سوال در همین مورد!

در کد زیر با انتخاب هر متن در هرجا از ویندوز و کپی کردن ان متن مورد نظر به تکست باکس منتقل میشه

Public prev_String As String

Private Sub Form_Load()

Clipboard.Clear

End Sub

Private Sub Timer1_Timer()

Dim clip As String

clip = Clipboard.GetText



If clip <> "" Then

    While prev_String <> clip

       Text1.Text = Clipboard.GetText

        prev_String = Clipboard.GetText

      

    Wend

End If



End Sub

حال اگر بخواییم بدون زدن کلیدی بصورت خودکار به تکست باکس منتقل بشه در این صورت باید چگونه کد ان را بنویسیم؟لطفا راهنمایی کنین.

[m2011kh]

برادر عزیزی که این تاپیکو زدن اگه چشم مبارکو چند سانتی متر میوردن پایین میدیدن تاپیکی که همین سوال رو توش جواب داده شده بود:
https://barnamenevis.org/showthread.p...AF%D9%88%D8%B2