VB.Net TextBox formatieren

Hallo ,

wie und wo kann man den Inhalt einer TextBox formatieren?

TextBox.Text ist per einfacher Bindung an eine ACCESS-Datenbank gebunden. In der DB hat das Feld "Geb-Datum" das Datumsformat TT.MM.JJJJ

In VB.Net Form2.txtGebDatum kommt aber 19.11.1965 00:00:00 an.

Wie kann ich die Zeitangabe 00:00:00 unterdrücken und nur das Datum in der Form TT.MM.JJJJ anzeigen ?

Gruß
Jochen

[ARCUS_L]

Hi !!

Hab diesen Beitrag wohl übersehen !!

Zuerst die Datenbindung einrichten !!

Sub DatenbindungEinrichten()

Dim Bi1 As Binding

Bi1 = Textbox1.DataBindings.Add(Hier deine Datenbindung)

AddHandler Bi1.Format, AddressOf RChange

End Sub

Nun noch die Formatierung des Datums

Sub RChange(ByVal sender As Object, ByVal e As ConvertEventArgs)

        e.Value = CType(e.Value, Date).ToShortDateString

End Sub

mfg ARCUS_L

Hallo ARCUS_L ,

bei der Formatierung der Datum-/Zeitangabe hatte ich mir mit der String Funktion Mid() wie folgt weitergeholfen :

Private Sub TxtGeburtsdatum_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TxtGeburtsdatum.TextChanged

Me.TxtGeburtsdatum.Text = Mid(Me.TxtGeburtsdatum.Text, 1, 10)

End Sub

Ich werde die Zeile dann aber nach Deiner Empfehlung wie folgt ändern:

CType(Me.TxtGeburtsdatum.Text, Date).ToShortDateString()

Das Zurückschreiben des Datums in die DB hat aber auch ohne Typenumwandlung funktioniert.
Aber das vermutlich wegen Option Strict=OFF

Danke für Deinen heutigen Tipp !

Gruß
Jochen