Textbox Edit Mask

I have a textbox used to enter date, and I would like to use and edit mask __/__/____ so user don't have to enter "/"


Idem for numerix textbox, is there a method to allow only numeric value inside textbox ?


and last one an edit mask which put all in lower case exept the first letter in uppercase.

duPOnt => Dupont


Thanks ;)

This allows only numeric values .

VB Code:

Dim KeyAscii As Integer
        KeyAscii = Asc(e.KeyChar)
 
        Select Case KeyAscii
            Case Asc("0") To Asc("9")
 
                e.Handled = False
            Case Else
                e.Handled = True
        End Select

Put that code into keypress event of the specified textbox .

Thanks :D ;) :p

The textbox object has a property called CharacterCasing which you can set to force all characters to lower case.

Quote:

---

Originally posted by skaterx2
The textbox object has a property called CharacterCasing which you can set to force all characters to lower case.

---

This does the same .

VB Code:

TextBox1.Text = StrConv(str, VbStrConv.LowerCase)

And to put only the first caractere in uppercase :

aPpLe = Apple ???

:D

VB Code:

TextBox1.Text = StrConv(str, VbStrConv.ProperCase)

Thanks but it change the first letter of all words in the textbox

What I would like is to change only the first Letter of the first word.


I thinks I'll need to create a small function for that.

Do I need to create a class when I create a function that can be used by all my forms ?

What could be the code ?


Thanks to all for your support, I'll finish my application this WE.

It's great to find peoples who are sharing their knowledge ;)

You don't need to create new class , just paste the code below in a module file then you can call it from anywhere within your project .

VB Code:

Public Function MyFunction(ByVal ProcessStr As String) As String
Dim CaptL As String = UCase(RSet(ProcessStr, 1))
Dim ResultStr As String
 
ResultStr = CaptL + ProcessStr.Remove(0, 1)
Return ResultStr.ToString
End Function

Usage (one way like this ) :

VB Code:

MessageBox.Show(MyFunction(TextBox1.Text))

Great you are the best ;) :D :p

why not use the DateTimePicker?