Problemer med Comboboxdata

Hej Eksperter
Hvad er der galt med min combobox?

Me.Betalingsadapter.SelectCommand = Me.OleDbSelectCommand2
        Me.OleDbSelectCommand2.CommandText = "SELECT BetalingsId, Betalingsform FROM Betalingsformer"
        Me.OleDbSelectCommand2.Connection = Me.OleDbConnection1
        Me.OleDbConnection1.Open()
        Me.ComboBox1.DataSource = BetalingDataset1.Tables(0)
        Me.ComboBox1.DisplayMember = "Betalingsform"
        Me.ComboBox1.Location = New System.Drawing.Point(264, 288)
        Me.ComboBox1.Name = "ComboBox1"
        Me.ComboBox1.Size = New System.Drawing.Size(232, 21)
        Me.ComboBox1.TabIndex = 24
        Me.ComboBox1.ValueMember = "BetalingsId"
        Me.OleDbConnection1.Close()

Når programmet køres vises der ingen data i comboboxen!