date/time field in access shows nonexistant time in databound textbox.

[Kyote]

I have a textbox that is databound to a table in an access database.
The field only contains month/day/year but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

---
Kyote

[Cor Ligthert[MVP]]

You can at least use format events

http://www.vb-tips.com/DataBindingEvents.aspx

Cor

"Kyote" <ky********@nos pamhotmail.coms chreef in bericht
news:k7******** *************** *********@4ax.c om...

>I have a textbox that is databound to a table in an access database.
The field only contains month/day/year but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

---
Kyote

[=?ISO-8859-1?Q?G=F6ran_Andersson?=]

Kyote wrote:

I have a textbox that is databound to a table in an access database.
The field only contains month/day/year

No, a Date/Time field actually always contains a time component, but the
time may be set to 00:00:00.

The value is read into the .NET type DateTime, which also always
contains a time component.

but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

Specify the FormatString in the Binding object.

--
Göran Andersson
_____
http://www.guffa.com

[=?Utf-8?B?S2VycnkgTW9vcm1hbg==?=]

Cor,

Here is your example changed to use FormatString and NullValue properties:

Public Class Form1
 
Private ds As New DataSet
 
Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load
 
Dim dt As New DataTable
ds.Tables.Add(dt)
dt.Columns.Add("DateField", GetType(System.DateTime))
dt.LoadDataRow(New Object() {New DateTime(2005, 8, 4)}, True)
dt.LoadDataRow(New Object() {Nothing}, True)
dt.LoadDataRow(New Object() {New DateTime(2005, 8, 5)}, True)
 
Dim Mybinding As New Binding("Text", ds.Tables(0), "DateField", True)
Mybinding.FormatString = "MM/dd/yyyy"
Mybinding.NullValue = "No date"
TextBox1.DataBindings.Add(Mybinding)
 
End Sub
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
 
'forward
Me.BindingContext(ds.Tables(0)).Position += 1
 
End Sub
 
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click
 
'backward
Me.BindingContext(ds.Tables(0)).Position -= 1
 
End Sub
End Class
 

Kerry Moorman
"Cor Ligthert[MVP]" wrote:

You can at least use format events

http://www.vb-tips.com/DataBindingEvents.aspx

Cor

"Kyote" <ky********@nos pamhotmail.coms chreef in bericht
news:k7******** *************** *********@4ax.c om...

I have a textbox that is databound to a table in an access database.
The field only contains month/day/year but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

---
Kyote

[Cor Ligthert[MVP]]

Kerry,

Thanks

I will see if I can implement it, a problem with checking for nulls is often
that it makes the sample more difficult to read. It is about to tell how it
can be done.

"Learning to fish not giving the fish".

I started this were I needed it for dates before 1753 and than raised those
by 3000

Maybe I make 2 samples from it.

Cor


"Kerry Moorman" <Ke**********@d iscussions.micr osoft.comschree f in bericht
news:45******** *************** ***********@mic rosoft.com...

Cor,

Here is your example changed to use FormatString and NullValue properties:

Public Class Form1

   Private ds As New DataSet

   Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load

       Dim dt As New DataTable
       ds.Tables.Add(dt)
       dt.Columns.Add("DateField", GetType(System.DateTime))
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 4)}, True)
       dt.LoadDataRow(New Object() {Nothing}, True)
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 5)}, True)

       Dim Mybinding As New Binding("Text", ds.Tables(0), "DateField",
True)
       Mybinding.FormatString = "MM/dd/yyyy"
       Mybinding.NullValue = "No date"
       TextBox1.DataBindings.Add(Mybinding)

   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

       'forward
       Me.BindingContext(ds.Tables(0)).Position += 1

   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click

       'backward
       Me.BindingContext(ds.Tables(0)).Position -= 1

   End Sub
End Class
 

Kerry Moorman
"Cor Ligthert[MVP]" wrote:

>You can at least use format events

http://www.vb-tips.com/DataBindingEvents.aspx

Cor

"Kyote" <ky********@nos pamhotmail.coms chreef in bericht
news:k7******* *************** **********@4ax. com...

>I have a textbox that is databound to a table in an access database.
The field only contains month/day/year but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

---
Kyote

[Kyote]

On Thu, 16 Aug 2007 20:21:50 +0200, "Cor Ligthert[MVP]"
<no************ @planet.nlwrote :

>You can at least use format events

http://www.vb-tips.com/DataBindingEvents.aspx

Thank you for the response Ken, and the help. I've done as it asked
and I'm currently playing around with it to try to understand all
that's happening. It does appear this would solve my problem. LOL
Looks like I'll be busy for a while trying to understand this.

---
Kyote

[Kyote]

On Thu, 16 Aug 2007 21:00:36 +0200, Göran Andersson <gu***@guffa.co m>
wrote:

>Kyote wrote:

>I have a textbox that is databound to a table in an access database.
The field only contains month/day/year

No, a Date/Time field actually always contains a time component, but the
time may be set to 00:00:00.

The value is read into the .NET type DateTime, which also always
contains a time component.

>but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

Specify the FormatString in the Binding object.

Thank you also for your response. I think your pretty much telling me
to do what Ken's example is showing me. With my limited understanding
of databinding and similar concepts this is going to take me quite a
while to understand, I have can understand it in a basic way even now.
So I have strong hopes of figuring out what all is happening to such a
degree that I can then make use of it for my app and any future app as
well.

Again, thank you for the help.
---
Kyote

[Cor Ligthert[MVP]]

Kerry,

The new Tip is here

http://www.vb-tips.com/DataBindingFormatFields

Cor

"Kerry Moorman" <Ke**********@d iscussions.micr osoft.comschree f in bericht
news:45******** *************** ***********@mic rosoft.com...

Cor,

Here is your example changed to use FormatString and NullValue properties:

Public Class Form1

   Private ds As New DataSet

   Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load

       Dim dt As New DataTable
       ds.Tables.Add(dt)
       dt.Columns.Add("DateField", GetType(System.DateTime))
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 4)}, True)
       dt.LoadDataRow(New Object() {Nothing}, True)
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 5)}, True)

       Dim Mybinding As New Binding("Text", ds.Tables(0), "DateField",
True)
       Mybinding.FormatString = "MM/dd/yyyy"
       Mybinding.NullValue = "No date"
       TextBox1.DataBindings.Add(Mybinding)

   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

       'forward
       Me.BindingContext(ds.Tables(0)).Position += 1

   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click

       'backward
       Me.BindingContext(ds.Tables(0)).Position -= 1

   End Sub
End Class
 

Kerry Moorman
"Cor Ligthert[MVP]" wrote:

>You can at least use format events

http://www.vb-tips.com/DataBindingEvents.aspx

Cor

"Kyote" <ky********@nos pamhotmail.coms chreef in bericht
news:k7******* *************** **********@4ax. com...

>I have a textbox that is databound to a table in an access database.
The field only contains month/day/year but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

---
Kyote

[Cor Ligthert[MVP]]

It does not show up in the link, we will have a look at the problem.

By hand it is there.

Cor

"Cor Ligthert[MVP]" <no************ @planet.nlschre ef in bericht
news:ui******** ******@TK2MSFTN GP04.phx.gbl...

Kerry,

The new Tip is here

http://www.vb-tips.com/DataBindingFormatFields

Cor

"Kerry Moorman" <Ke**********@d iscussions.micr osoft.comschree f in
bericht news:45******** *************** ***********@mic rosoft.com...

>Cor,

Here is your example changed to use FormatString and NullValue
properties:

Public Class Form1

   Private ds As New DataSet

   Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load

       Dim dt As New DataTable
       ds.Tables.Add(dt)
       dt.Columns.Add("DateField", GetType(System.DateTime))
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 4)}, True)
       dt.LoadDataRow(New Object() {Nothing}, True)
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 5)}, True)

       Dim Mybinding As New Binding("Text", ds.Tables(0), "DateField",
True)
       Mybinding.FormatString = "MM/dd/yyyy"
       Mybinding.NullValue = "No date"
       TextBox1.DataBindings.Add(Mybinding)

   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

       'forward
       Me.BindingContext(ds.Tables(0)).Position += 1

   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click

       'backward
       Me.BindingContext(ds.Tables(0)).Position -= 1

   End Sub
End Class

Kerry Moorman
"Cor Ligthert[MVP]" wrote:

>>You can at least use format events

http://www.vb-tips.com/DataBindingEvents.aspx

Cor

"Kyote" <ky********@nos pamhotmail.coms chreef in bericht
news:k7****** *************** ***********@4ax .com...
I have a textbox that is databound to a table in an access database.
The field only contains month/day/year but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

---
Kyote

[Cor Ligthert[MVP]]

This should do it now.

http://www.vb-tips.com/DataBindingFormatFields.aspx

Cor

"Cor Ligthert[MVP]" <no************ @planet.nlschre ef in bericht
news:Oq******** ******@TK2MSFTN GP02.phx.gbl...

It does not show up in the link, we will have a look at the problem.

By hand it is there.

Cor

"Cor Ligthert[MVP]" <no************ @planet.nlschre ef in bericht
news:ui******** ******@TK2MSFTN GP04.phx.gbl...

>Kerry,

The new Tip is here

http://www.vb-tips.com/DataBindingFormatFields

Cor

"Kerry Moorman" <Ke**********@d iscussions.micr osoft.comschree f in
bericht news:45******** *************** ***********@mic rosoft.com...

>>Cor,

Here is your example changed to use FormatString and NullValue
properties:

Public Class Form1

   Private ds As New DataSet

   Private Sub Form1_Load(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Load

       Dim dt As New DataTable
       ds.Tables.Add(dt)
       dt.Columns.Add("DateField", GetType(System.DateTime))
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 4)}, True)
       dt.LoadDataRow(New Object() {Nothing}, True)
       dt.LoadDataRow(New Object() {New DateTime(2005, 8, 5)}, True)

       Dim Mybinding As New Binding("Text", ds.Tables(0), "DateField",
True)
       Mybinding.FormatString = "MM/dd/yyyy"
       Mybinding.NullValue = "No date"
       TextBox1.DataBindings.Add(Mybinding)

   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

       'forward
       Me.BindingContext(ds.Tables(0)).Position += 1

   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button2.Click

       'backward
       Me.BindingContext(ds.Tables(0)).Position -= 1

   End Sub
End Class

Kerry Moorman
"Cor Ligthert[MVP]" wrote:

You can at least use format events

http://www.vb-tips.com/DataBindingEvents.aspx

Cor

"Kyote" <ky********@nos pamhotmail.coms chreef in bericht
news:k7***** *************** ************@4a x.com...
I have a textbox that is databound to a table in an access database.
The field only contains month/day/year but my databound textbox is
also showing a time. Is there any way to prevent it from doing this?

---
Kyote