سوال: پيدا كردن موقعيت cursor در تكست باكس [بایگانی]

fkh1974

شنبه 31 مرداد 1388, 12:45 عصر

سلام دوستان .ميشه منو راهنمايي كنين كه چطور ميتونم موقعيت جاري cursor را در Textbox ( از نظر شماره سطر و ستون ) بدست بيارم .
ممنون .

bastakboys

شنبه 31 مرداد 1388, 13:14 عصر

در textbox سطر و ستون ؟؟؟؟:متفکر:

Hossis

شنبه 31 مرداد 1388, 13:31 عصر

من یک سورس پیدا کردم که به زبان وی بی 6 هست می تونی کدش رو به دات نت تبدیل کنی
به این آدرس برو (http://vb2008.mihanbb.com/thread-47.html)

anooshiran

شنبه 31 مرداد 1388, 13:37 عصر

سلام دوست عزيز

يا استفاده از كد زير مي توانيد موقعيت cursor را در textbox تشخيص دهيد.

Dim a As Int16 = TextBox1.SelectionStart

Hossis

شنبه 31 مرداد 1388, 14:03 عصر

سلام دوست عزيز

يا استفاده از كد زير مي توانيد موقعيت cursor را در textbox تشخيص دهيد.

این کد جواب ایشون رو نمی ده چون شماره سطر و ستون رو می خواستند نه شماره قسمت انتخاب شده
مثلا باید بفهمد "و" قرمز در خط بالا، در سطر 1 و ستون 20 است

ACorvinus

شنبه 31 مرداد 1388, 14:18 عصر

اینم از این:

Dim Row as String = Textbox.GetLineFromCharIndex(TextBox.SelectionStar t) + 1.ToString
Dim Col as String = Textbox.SelectionStart - Textbox.GetFirstCharIndexOfCurrentLine.ToString

Msgbox(Row + ", " + Col)

fkh1974

یک شنبه 01 شهریور 1388, 09:37 صبح

اینم از این:

Dim Row as String = Textbox.GetLineFromCharIndex(TextBox.SelectionStar t) + 1.ToString
Dim Col as String = Textbox.SelectionStart - Textbox.GetFirstCharIndexOfCurrentLine.ToString

Msgbox(Row + ", " + Col)

من واقعا از راهنمايي شما ممنونم

fkh1974

یک شنبه 01 شهریور 1388, 09:39 صبح

اینم از این:

Dim Row as String = Textbox.GetLineFromCharIndex(TextBox.SelectionStar t) + 1.ToString
Dim Col as String = Textbox.SelectionStart - Textbox.GetFirstCharIndexOfCurrentLine.ToString

Msgbox(Row + ", " + Col)

این کد جواب ایشون رو نمی ده چون شماره سطر و ستون رو می خواستند نه شماره قسمت انتخاب شده
مثلا باید بفهمد "و" قرمز در خط بالا، در سطر 1 و ستون 20 است

با سپاس از راهنماييتون