vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Re: Format TextBox mit DataBinding an DataSet 
Autor: Wolf
Datum: 07.04.05 08:47

Ich habe jetzt folgendes realisiert:

DURCH .NET AUTOMATISCH ERZEUGT (DataForm-Assistent):

#Region " Vom Windows Form Designer generierter Code "
...
Friend WithEvents editAnfang01 As System.Windows.Forms.TextBox
...
Me.editAnfang01 = New System.Windows.Forms.TextBox
...
'editAnfang01
'
Me.editAnfang01.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objdstAlleDateien, "Feld01.Anfang01"))
Me.editAnfang01.Location = New System.Drawing.Point(80, 64)
Me.editAnfang01.Name = "editAnfang01"
Me.editAnfang01.Size = New System.Drawing.Size(64, 22)
Me.editAnfang01.TabIndex = 20
Me.editAnfang01.Text = ""
Me.editAnfang01.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
...
Me.GroupBox1.Controls.Add(Me.editAnfang01)



EIGENER CODE:

Im Event frm_Load:

' Legt neue Bindung fest
Me.editAnfang01.DataBindings.Clear()
Dim a As Binding = New System.Windows.Forms.Binding("Text", Me.objdstAlleDateien, "Feld01.Anfang01")
' Addiere die Handler
AddHandler a.Format, AddressOf DecimalToCurrencyString
AddHandler a.Parse, AddressOf CurrencyStringToDecimal
Me.editAnfang01.DataBindings.Add(a)
...
Danach noch die Routinen für DecimalToCurrencyString und CurrencyStringToDecimal in denen die Konvertierung (bzw. Rückkonvertierung) stattfindet (hier als Bsp. für Währung).

Das funktioniert erst mal.



FRAGE:

Die TextBox ist nur eine von vielen in dem Formular. Nach dem obigen Schema müsste ich mit "Dim a As Binding ..., AddHandler a.Format ..., usw." für jede TextBox neue Bindungs b, c, d usw. definieren. Geht das auch ohne explizite Definition von a, b, c ...? Quasi in einem "kompakten" Befehl, wie in dem vom Windows Form Designer generierter Code (Me.editAnfang01.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.objdstAlleDateien, "Feld01.Anfang01")), s.o.)?


Gruß, Wolfgang.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Format TextBox mit DataBinding an DataSet6.410Wolf06.04.05 09:48
Re: Format TextBox mit DataBinding an DataSet4.242ModeratorDaveS06.04.05 10:04
Re: Format TextBox mit DataBinding an DataSet4.141Wolf06.04.05 10:45
Re: Format TextBox mit DataBinding an DataSet5.043Wolf06.04.05 11:02
Re: Format TextBox mit DataBinding an DataSet4.278ModeratorDaveS06.04.05 12:55
Re: Format TextBox mit DataBinding an DataSet4.075Wolf06.04.05 15:49
Re: Format TextBox mit DataBinding an DataSet4.498Wolf07.04.05 08:47
Re: Format TextBox mit DataBinding an DataSet4.097ModeratorDaveS07.04.05 08:59
Re: Format TextBox mit DataBinding an DataSet4.246Wolf07.04.05 11:40

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel