جایگزینی آیکون به جای متن (فوری)vb.net

[Narouei]

سلام و خسته نباشید.

میخواستم تو vb.net وقتی یه متن تو richtextbox مینویسیم یه آیکون به جاش لود شه

مثل برنامه های چت مثلا :لبخند: جایگزین":-D" این کاراکتر شه!

ممنون میشم کمک کنید

[ROSTAM2]

برای گرفتن آیکون از یک آدرس مثل .exe ,.ico,.dll از این دستور می تونی استفاده کنی
Icon.ExtractAssociatedIcon(Path)

[کاظم فلاحی خواه]

سلام دوست عزیز پروژه ات آماده شده :
86007

[Narouei]

کاظم جان خیلی خیلی مرسی مشکلم حل شد.. خیلی آقایی:بوس:

[zaeimh90]

این آقا کاظم کارش حرف نداره:چشمک:

فقط یه باگ داره با عرض شرمندگی، اگر بنویسی مثلا zakfa اونوقت تا بی نهایت برات paste میکنه.
ولی به جای RichTextBox1.Find("AKFA", RichTextBoxFinds.WholeWord)
If StartPosition = 0 Then
Exit Do
End If
بنویس If StartPosition = 0 Then
Exit Do
Else
RichTextBox1.Select(StartPosition - 1, 4)
End If

البته ببخشیدا.

[Narouei]

دوستان از همه تشکر می کنم... یه مشکل دیگه وقتی متن رو از یه تکس باکس دیگه میگیرم تصویر تصویر قبلی که تو richtextbox هست حذف میشه!!! مثلا:

richtextox1.text = richtextbox1.text & vbnewline & textbox1.text

ایکون جدید که وارد میشه قبلیه حذف میشه!!!

:ناراحت:
86078

[zaeimh90]

سلام.
خوب باید بعد از عملیت جابجایی دوباره دستورات بالا رو بعدش تکرار کنی که تو متن جدید هم جایگذین بشه.
و اینم همیشه حواست باشه که richtextbox یه textbox نیست ااون اصلا متن نیست و زیرش همش کدی شبیه کدهای html هست.اگر یک بار سیوش کنی و با nodepad بازش کنی قشنگ متوجه میشی که چی میگم.
بخاطر همین وقی جابجایی صورت میگیره فقط متن میاد و نه عکس خودت باید تعویضش کنی.