حذف کرزر در textbox

[Shabani.Mojtaba]

با سلام خدمت همه عزیزان
می خواستم بدونم آیا میشود کاری کرد که داخل textbox هیچوقت کرزر نداشته باشیم ؟ :متفکر:

[علیرضا مداح]

سلام .


Declare Function HideCaret Lib "user32" (ByVal hwnd As IntPtr) As Integer
Declare Function ShowCaret Lib "user32" (ByVal hwnd As IntPtr) As Integer

Sub ShowCursor()
Call ShowCaret(TextBox1.Handle)
End Sub
Sub HideCursor()
Call HideCaret(TextBox1.Handle)
End Sub

[Shabani.Mojtaba]

خیلی متشکرم
ولی الان این سوال مطرح میشه که بجای انکار چرا از کنترل label استفاده نکنیم :متفکر:
اونم وقتی که خاصیت borderstyle او را fixed3D انتخاب کنیم دقیقا مثل textbox میشه :متفکر:

[علیرضا مداح]

اونم وقتی که خاصیت borderstyle او را fixed3D انتخاب کنیم دقیقا مثل textbox میشه

بله درسته ، ولی اگه از Label استفاده کنید کاربر نمیتواند به طور مستقیم متن درون آن را تغییر دهد .