ورود

View Full Version : نمایش شکلک در RichTextBox



rabenhod55
یک شنبه 14 شهریور 1389, 17:48 عصر
سلام از این کد واسه نمایش شکلک در ریچ تکست باکس استفاده کردم در ویندوز 7 اما متاسفانه جواب نمیده
اگر میشه راهنمایی کنید ممنون میشم



For x = 0 To imgSmiley.UBound
If rtbMain.Find(imgSmiley(x).Tag, tLoc) <> -1 Then
rtbMain.SelStart = rtbMain.Find(imgSmiley(x).Tag, tLoc)
rtbMain.SelLength = Len(imgSmiley(x).Tag)
Clipboard.Clear
Clipboard.SetData imgSmiley(x).Picture
SendMessage rtbMain.hwnd, WM_PASTE, 0, 0

IamOverlord
یک شنبه 21 شهریور 1389, 05:40 صبح
سلام دوست عزیز!
کدی که گذاشتید، کامل نیست. حتّی next هم نذاشتید برای for.

rabenhod55
دوشنبه 22 شهریور 1389, 14:21 عصر
درسته من سوری بد گذاشتم
به جواب سوال رسیدم یه بی دقتی بود