ports System.Data.OleDb
 
Public Class FilmkatalogMainForm
 
 Private Sub FilmkatalogMainForm_Load(ByVal ...
  Dim strSQL As String = "SELECT * FROM *"
  '???? = Frage
  Dim ConnectionStringToDatabase As String = "????"
  Dim da As New OleDbDataAdapter(strSQL, ConnectionStringToDatabase)
  Dim dt As New DataTable
  da.Fill(dt)
  KatalogDataGridView1.DataSource = dt
 End Sub
 
End Class