Example of Masked Textbox Control in VB.NET
Design a simple application that asks for User Name, Mobile Number and Birth Date. Use MaskedTextBox control to accept input from user.
Step 1: Design a form as shown below:
Step 2: Now set properties of various controls as given below:
| Control Name | Property Name | Value |
Form1 |
Text |
MaskedTextBox Demo |
Label1 |
Text |
Enter Name: (Maximum 20 Character) |
MaskedTextBox1 |
Name |
MaskedName |
Mask |
L??????????????????? |
|
Label2 |
Text |
Enter 10 Digit Mobile Number: |
MaskedTextBox2 |
Name |
MaskedMobile |
Mask |
0000000000 |
|
Label3 |
Text |
Enter Birth Date |
MaskedTextBox3 |
Name |
MaskedDate |
Mask |
00/00/0000 |
|
Button1 |
Name |
cmdDisplay |
Text |
Display |
|
Label4 |
Text |
Name: |
Label5 |
Text |
Mobile Number: |
Label6 |
Text |
Birth Date: |
Label7 |
Name |
lblName |
Text |
____________ |
|
Label8 |
Name |
lblMobile |
Text |
____________ |
|
Label9 |
Name |
lblDate |
Text |
____________ |
Step 3: Double click on MaskedTextBox1 and write following code in MaskInputRejected event:
Step 4: Double click on MaskedTextBox2 and write following code in MaskInputRejected event:
Step 5: Double click on MaskedTextBox3 and write following code in MaskInputRejected event:
Step 6: Now double click on Display button and write following code to display information.
MsgBox("Please Enter Name")
MaskedName.Focus()
ElseIf MaskedMobile.Text = "" Then
MsgBox("Please Enter Mobile")
MaskedMobile.Focus()
ElseIf MaskedDate.Text = "" Then
MsgBox("Please Enter Date")
MaskedDate.Focus()
Else
lblName.Text = MaskedName.Text
lblMobile.Text = MaskedMobile.Text
lblDate.Text = MaskedDate.Text
End If