Using MaskEdBox

In MaskEdBox, I have the following code:

Code:

---

medDOB.Mask = "##/##/##"
medDOB.Text = Format(rstPlayer!sgcusbdate, "ddddd")

---

Now if the date part is less than 10, then it display only 1 integer, but the Mask expect 2 integer. So error occur.

How can I make sure that the datepart is always 2 integers? (Note: I must use dateformat "ddddd" ie. vbshortdate since this is an international app.)

Thanks.

Why not use a DTpicker? It will always give you a valid date...

Quote:

---

Originally posted by TheBao
In MaskEdBox, I have the following code:

Code:

---

medDOB.Mask = "##/##/##"
medDOB.Text = Format(rstPlayer!sgcusbdate, "ddddd")

---

Now if the date part is less than 10, then it display only 1 integer, but the Mask expect 2 integer. So error occur.

How can I make sure that the datepart is always 2 integers? (Note: I must use dateformat "ddddd" ie. vbshortdate since this is an international app.)

Thanks.

---

Here is how I use a MaskEdBox in code:

VB Code:

Dim tmpMask As String
tmpMask = MaskEdBox1.Mask
MaskEdBox1.Mask = ""
MaskEdBox1.Text = <Some value goes here>
MaskEdBox1.Mask = tmpMask

To put it simply, you extract the existing mask into a temporary variable, remove the mask, then set the text and reset the mask using the temporary variable. I am sure this will do the trick for you.

.

Thank you. Actually, what I want is more than that.

I don't know before hand what the format of the date on the user machine is. So I end up have to get this from the regional setting, then convert this to the mask string for the MaskEdBox.

Thanks.

Can you retrieve the format from the regional settings? Converting it to a Mask value is your problem? Or once the mask is set, displaying data in that format is a problem?

I guess you can use the "Short Date" in the Format() function to format the date as per the user's regional settings. If the problem is the second one, I can help.

.