astonmartin
New member
- Joined
- Sep 12, 2024
- Messages
- 4
- Programming Experience
- Beginner
Hallo,
Ich wähle die Zeile in DGV1 aus, die ich brauche und füge sie zu DGV2 hinzu,
in DGV1 habe ich die Spalten „Menge“, „E-Preis“ und „Gesamt“, in DGV2 die gleichen Spalten.
Auf was ich gestoßen bin ist, als ich die Menge in DGV1 von 1 Stück auf 2 Stück veränderte
fehlt in DGV2 Spalte „Gesamt“ eine Dezimalstelle, dies passiert immer wenn ich in DGV1
eine gerade Zahl eingebe, bei ungerade Zahlen nicht.
Beispiel:
in DGV1 steht in Spalte "Menge" 1 Stück , E-Preis 40,90 € = Gesamt 40,90 € ,in DGV2 auch das selbe.
Ändere ich nun in DGV1 die Menge auf 2 Stück erscheint in DGV2 in Spalte "Gesamt" 40,9 € .
DGV1 ist gebunden, DGV2 ungebunden
Hier mal der Code wie ich die Zeile von DGV1 zu DGV2 hinzufüge:
Private Sub Button6_Click(sender As Objekt, e As EventArgs) Handles Button6.Click
'Ausgewählte Zeilen aus Datagridview1 nach Datagridview2 Kopieren
Datagridview2.ColumnCount = 5 'Anzahl Spalten
For Each dgvRow In DataGridView1.SelectedRows
Dim row3() As String = {dgvRow.Cells(1).Value.ToString(), dgvRow.Cells(6).Value.ToString(), dgvRow.Cells(3).Value.ToString(), dgvRow.Cells(7).Value.ToString() , dgvRow.Cells(7).Value.ToString * dgvRow.Cells(6).Value.ToString() }
Datagridview2.Rows.Add(row3)
Next
Ende Sub
Komm nicht auf den Fehler...
Gruß Andi
Ich wähle die Zeile in DGV1 aus, die ich brauche und füge sie zu DGV2 hinzu,
in DGV1 habe ich die Spalten „Menge“, „E-Preis“ und „Gesamt“, in DGV2 die gleichen Spalten.
Auf was ich gestoßen bin ist, als ich die Menge in DGV1 von 1 Stück auf 2 Stück veränderte
fehlt in DGV2 Spalte „Gesamt“ eine Dezimalstelle, dies passiert immer wenn ich in DGV1
eine gerade Zahl eingebe, bei ungerade Zahlen nicht.
Beispiel:
in DGV1 steht in Spalte "Menge" 1 Stück , E-Preis 40,90 € = Gesamt 40,90 € ,in DGV2 auch das selbe.
Ändere ich nun in DGV1 die Menge auf 2 Stück erscheint in DGV2 in Spalte "Gesamt" 40,9 € .
DGV1 ist gebunden, DGV2 ungebunden
Hier mal der Code wie ich die Zeile von DGV1 zu DGV2 hinzufüge:
Private Sub Button6_Click(sender As Objekt, e As EventArgs) Handles Button6.Click
'Ausgewählte Zeilen aus Datagridview1 nach Datagridview2 Kopieren
Datagridview2.ColumnCount = 5 'Anzahl Spalten
For Each dgvRow In DataGridView1.SelectedRows
Dim row3() As String = {dgvRow.Cells(1).Value.ToString(), dgvRow.Cells(6).Value.ToString(), dgvRow.Cells(3).Value.ToString(), dgvRow.Cells(7).Value.ToString() , dgvRow.Cells(7).Value.ToString * dgvRow.Cells(6).Value.ToString() }
Datagridview2.Rows.Add(row3)
Next
Ende Sub
Komm nicht auf den Fehler...
Gruß Andi