|
| |
VB.NET - Fortgeschrittene| ²WaldiMaywood | |  | | Autor: HellSeeker2k | | Datum: 18.02.04 12:59 |
| also hier die versprochenen Fragen zu meinem Projekt: 
1.) Was mach ich bei dem Dialog in der Form "frmAuftrag" falsch ?
Also ich habe ein MDI Parent (frmParent"). Von dort öffne ich die Form "frmAuftrag" als MDICHILD. Von dem Auftragformula will ich einen Dialog öffnen der aus 3 Formen (frmModell; frmModell2 und frmRechner) besteht.
Die Infos die ich an das Auftragsformular in ein DataSet senden will sind: Positionsnummer, Modell, Bezeichnung, Maße, Stück und Preis. Falls du es dir noch nicht angesehen hast hier mein Code:
'frmAuftrag "Hinzufügenbutton"
Private Sub hinzufuegenbut_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles hinzufuegenbut.Click
Dim frmmodell As New frmModell
rows = Me.LIPO.Rows.Count + 1 'Positionsnummer im DataSet
Me.nettolbl.Text = netto 'Preis
frmmodell.ShowDialog()
LIPO.Rows.Add(New Object() {pos1, Modell1, bezeichnung1, masse1, _
stueck1, preis1}) 'Die Zeile fürs DataSet
'frmModell
Private Sub weiterbut_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles weiterbut.Click
Dim frmModell2 As New frmModell2
Me.Close()
frmModell2.ShowDialog()
'frmModell2
Private Sub weiterbut_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles weiterbut.Click
Dim frmrechner As New frmRechner
Me.Close()
frmRechner.ShowDialog()
'frmRechner
Private Sub berechnenbut_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles berechnenbut.Click
preis1 = Me.preistlbl.Text & " €"
pos1 = rows
bezeichnung1 = "Kaempfer:" & " " & Me.kaempferdown.Value + KaempferX & ";" & _
"Sektionen:" & " " & Me.sektionendown.Value + Sektionen
stueck1 = Me.stueckdown.Value
masse1 = Me.tbcbo.Text & "*" & Me.thcbo.Text
Modell1 = Me.modelllbl.Text
netto = Listenpreis
me.close()so. Das mag jetzt etwas komisch aussehen, aber ich schreibe lieber zu viel als zu wenig. Also es funkt eingentlich ganz gut, aber wenn ich den Dialog offen habe und auf Abbrechen(me.close()) klicke, wird mir eine leere Zeile in mein DataSet eingefügt. Und dann kommt noch dazu, dass die einzelnen Dialoge offenbleiben, bis der letzte geschlossen ist.
2.) Ich hab dich zwar schon mal gefragt, aber es hat bei mir einfach nicht funktioniert:
Ich will logischerweise alle Preise in dem DataSet (DataSet"Auftrag";Tabelle "LIPO";Column "Preis") zusammenzählen und im Auftragformular als gesamtpreis ausgeben. Nur mit deiner Lösung hab ich es einfach nicht hinbekommen. Jetzt habe ich zwar eine ausgetüftelt wie du im Projekt sehen kannst, nur die is eigentlich ziemlicher Müll.
also wenn du mal Zeit und Laune hast könntest mir ja mal ein Paar Tipps geben.
mfg
H2K | |
 | 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 |
 |
|
Neu! sevDTA 3.0 Pro 
SEPA mit Kontonummernprüfung
Erstellen von SEPA-Dateien mit integriertem BIC-Verzeichnis und Konto- nummern-Prüfverfahren, so dass ungültige Bankdaten bereits im Vorfeld ermittelt werden können. Weitere InfosTipp des Monats TOP Entwickler-Paket 
TOP-Preis!!
Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1866.50 EUR...
Jetzt nur 979,00 EURWeitere Infos
|
| |
|
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
|
|
Sie sind aktuell nicht angemeldet.
