جدا کردن کلمه از متن

[arsalansalar]

با سلام
من یک فرم درست کردم که درون ان یک تکست باکس وجود دارد که در ان متن بلند وجود دارد.(عکس ضمیمیه کردم)
حالا می خواهم زمانی که کاربر بر روی یک کلمه کلیک چپ کرد و رنگ آن آبی شد اون کلمه تو یک تکست باکس دیگر بیفتد

[AMIN_SG]

سلام تو رویداد mouse up تکس باکست کد زیر رو بنویس مشکلت حل میشه


If TextBox1.SelectedText <> String.Empty Then
TextBox2.Text = TextBox1.SelectedText
Else
TextBox2.Text = String.Empty
End If

[arsalansalar]

من یکجوری سوالمو بد مطرح کردم.منظور من این بود که موس رو کلمه نگه دارم

[hosein320]

میشه دقیق تر بگین:متفکر:

[AMIN_SG]

سلام
بعد از یکی دو ساعت فکر کردن تونستم اینو واست بسازم اگه کاربر متن رو انتخاب کنه و 1.5 ثانیه روی متن با موس صبر کنه متن تو تکس باکس دو اضافه میشه امیدوارم کارتو راه بندازه :چشمک:

100086

[AMIN_SG]

ببخشید دوباره مطلبو دارم میکشم بالا
این برنامه ای که گذاشته بودم یه مشکلی داره اونم اینه که اگه طرف رنگ متن رو عوض کرده باشه یا تمی که رنک متن انتخابیش آبی نباشه گذاشته باشه برنامه کار نمیکنه فقط کافیه این کد رو بجای کد قبلی جایگزین کنید تا درست شه


Private Sub RichTextBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles RichTextBox1.MouseMove

If Label1.BackColor.R = SystemColors.Highlight.R Then
Timer2.Enabled = True
Else
Timer2.Enabled = False

End If

End Sub