To make characters in the text of TextBox ReadOnly.

[Prodigy201]

Hi All !! I am new to VB.NET... I want to make the characters in the text of TextBox control read only... That is, those characters should not be replaced by any other character, or can not be editable... So is there any property or method that can be implemented to the charactres/text(string) of textbox's text ?? Well, very clearly, I don't want to make the whole Textbox uneditable. I just want some part of input and moreover already set text in the textbox uneditable, as we can see as par as in MaskedTextBox, for e.g. in date format, we have "/" separator uneditable. So I just want to make the text uneditable. Expecting the responses.:) Thanks, Prodigy201

[kyosugi]

my 1 i used the property table of the textbox scroll and go find the read-only option n set it to true

[Prodigy201]

Hi !! Thanks for the response ! Well, I don't want to make whole textbox control as readonly, but I just want to make some part of text in the textbox readonly, i.e to make some part of the text uneditable, as we can find it in MaskedTextBox control. for e.g. "/" separator in date format (found in mask properties of MaskedTextBox) as uneditable character. So is there any property or method that can be used to make this functionality? Expecting response :) Thanks, Prodigy201

[Dave Kreskowiak]

There is no property in the TextBOx that will do this for you. You'll either have to use the MaskedTextBox control to get what you want (easiest option), or create your own version of the control (much more difficult).

Dave Kreskowiak Microsoft MVP - Visual Basic

[Stephen McGuire]

You can use the KeyPress event of your textbox field to override the characters that are entered, forcing the character at a certain position in the string to be a particular character. You can also limit the number of characters enetered. The following example is for a date entry field: With YourTextBox If Len(.Text) >= 10 And Not e.KeyChar = ChrW(8) Then MsgBox("Maximum number of input characters is 10!", _ MsgBoxStyle.Information, "Invalid Data Input") Exit Sub ElseIf Len(.Text) = 2 And Not e.KeyChar = ChrW(8) And Not e.KeyChar = ChrW(47) Then .Text = .Text & "/" .Select(.Text.Length, 0) ElseIf Len(.Text) = 5 And Not e.KeyChar = ChrW(8) And Not e.KeyChar = ChrW(47) Then .Text = .Text & "/" .Select(.Text.Length, 0) Else End If End With I use something similar to this to validate entry on all my fields. It is used in combination with the TextChanged and Validating events. I have stripped out code for setting errorproviders etc.. Steve