Visual Basic - añadir datos de combobox a un bd en mysql

Buen dia, disculpen quisiera saber si alguien alguien sabe como puedo seleccionar los datos de un combobox para que al guardarlos la base de datos los deje sobre la tabla.

He intentado de varias maneras pero no me llega a reconocer el dato, la tabla donde quiero agregar esos datos es esta:
create table pago
(
Idpago int not null auto_increment primary key,
Formpago varchar(50) not null
);
insert into pago(Formpago) values("Efectivo");
insert into pago(Formpago) values("Tarjeta");
select * from pago;

y este es el codigo del combobox (Esta en un module):

Public Sub empleado_combobox_metodpago()


Dim adapter As MySqlDataAdapter
Dim data As DataSet
Dim strcomando As String

Try
strcomando = "select * from pago"
adapter = New MySqlDataAdapter(strcomando, conexion)
data = New DataSet

adapter.Fill(data)
empleado.cbxproductos.DataSource = data.Tables(0)
empleado.cbxproductos.DisplayMember = "Formpago"
empleado.cbxproductos.ValueMember = "Idpago"

Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub


la conexion esta bien pero al darle iniciar me aparacere el error "There is already an open DataReader associated with this connection which must be closed first"


Alguien podria ayudarme? por favor

lo unico q quieres es guardar lo que seleccionas en el combo?
el error da que en algun lado no cerraste la conexion o al reves esta intentando abrir la conexion pero ya se encuentra abierta.