Hallo.
Ich bin zwar Anfänger auf dem Gebiet vb.net , will aber trotzdem mein Programm ohne Assistenten erstellen.
Dabei habe ich nun folgendes Problem:
Ich habe ein Formular erstellt mit einem ungebundenen Datagridview1.
Für das Datagridview habe ich mit dem Designer 5 ungebundene Spalten erstellt. (3x Combobox und 2x Textbox)
Ich möchte nun dass diese 5 Spalten mit Daten aus einer DataTable (dt) befüllt werden.
Im folgend gezeigten Beispiel werden aber zusätzlich 5 Spalten im DGV erzeugt wo dann die Daten angezeigt werden.
Geht das überhaupt?
*Topic verschoben*
Ich bin zwar Anfänger auf dem Gebiet vb.net , will aber trotzdem mein Programm ohne Assistenten erstellen.
Dabei habe ich nun folgendes Problem:
Ich habe ein Formular erstellt mit einem ungebundenen Datagridview1.
Für das Datagridview habe ich mit dem Designer 5 ungebundene Spalten erstellt. (3x Combobox und 2x Textbox)
Ich möchte nun dass diese 5 Spalten mit Daten aus einer DataTable (dt) befüllt werden.
Im folgend gezeigten Beispiel werden aber zusätzlich 5 Spalten im DGV erzeugt wo dann die Daten angezeigt werden.
VB.NET-Quellcode
- Imports System.Data.OleDb
- Public Class Form1
- Private conn As New OleDbConnection
- Dim da As OleDbDataAdapter = Nothing
- Private dt As DataTable = Nothing
- Private dv As DataView = Nothing
- Private drv As DataRowView = Nothing
- Dim lokPfad As String
- Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- 'Datenzugriff
- lokPfad = My.Settings.DbPfad
- 'Datenverbindung
- conn = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & lokPfad & "\KPlanung_Daten.accdb")
- 'DatenAdapter
- da = New OleDbDataAdapter("SELECT TransArt, Kategorie, Einrichtung, Umsatz, Konto FROM tbl_VorgabeFixk ORDER BY Kategorie, Einrichtung", conn)
- 'CommandBuilder
- Dim cb As New OleDbCommandBuilder(da)
- 'DataTable
- dt = New DataTable("Vorgaben")
- 'DataView
- dv = New DataView(dt)
- 'BindingSource
- Dim bs As New BindingSource()
- bs.DataSource = dv
- DataGridView1.DataSource = bs
- conn.Open()
- da.Fill(dt)
- conn.Close()
- End Sub
- End Class
Geht das überhaupt?
*Topic verschoben*
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Marcus Gräfe“ ()