Masked Edit Control

[mpSmooth]

The users of my app are going to be entering dates, and I want the Masked edit control to already have the " / / " in it, so the user doesn't have to type it. I've never used the control before, I've tried setting the Mask, and it put the " / / " inside of it, except it wouldn't allow the user to type any data into it. Any suggestions, thanks

[HeSaidJoe]

Private Sub Form_Load()
    MaskEdBox1.Mask = "####/##/##"  
End Sub

[mpSmooth]

thanks HeSaidJoe, what is wrong with this code, it wont let me do this:

Dim ctr as control

For each ctr in controls
If TypeOF ctr is MaskEDBox then
'Do something
end if
Next ctr

I have about ten mask edit controls, so I wanted to simplify it by using this code, but its not working?? Any suggestions

[HeSaidJoe]

'Clear all MaskEdit Boxes on Form

Public Sub ClearAllMskEdits()

	For intIncrement = 0 To Forms.Count - 1
        	For Each ctlMyControl In Forms(intIncrement).Controls
'
   	If TypeOf ctlMyControl Is MaskEdBox Then
'
            ctlMyControl.Mask = ""
            ctlMyControl.Text = ""
'Here you need to reset the mask to whatever it was
'example
	   ctlMyControl.Mask = "###.00"         
'
   End If
'
        Next ctlMyControl
'
            Next intIncrement
'
End Sub