Visual Basic - error combobox

Life is soft - evento anual de software empresarial
 
Vista:

error combobox

Publicado por majose (2 intervenciones) el 06/06/2023 11:55:17
SABÉIS POR QUÉ ME SALE EL ERROR " No se puede convertir un objeto de tipo 'System.Windows.Forms.ComboBox' al tipo 'Microsoft.Office.Interop.Access.ComboBox"
Supongo que tiene que ver con las referencias del proyecto. Me sale desde que convertí el proyecto de VB2010 a VB2017
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

error combobox

Publicado por MAJOSE (2 intervenciones) el 03/07/2023 12:03:17
En general el programa funciona bien, solo me falla cuando intento rellenar el combobox:

Public Sub EligeRefCaja()
Dim SQL4 As String = "SELECT distinct * from ReferenciasCajas"
OBJ.OPERACIONdatos(CmbRefCaja, SQL4)
CmbRefCaja.DisplayMember = "tipo"
CmbRefCaja.ValueMember = "ref_caja"
CmbRefCaja.Visible = True
Me.refcajatextoTextBox.Visible = False
Me.REFCAJATextBox.Visible = True

Exit Sub

Public Sub OPERACIONdatos(ByVal COMBO As Microsoft.Office.Interop.Access.ComboBox, ByVal SQL As String)
MICON.Open()
'CONECTARSE()
Try
Dim DA As New OleDbDataAdapter(SQL, MICON)
Dim DT As New DataTable
DA.Fill(DT)
COMBO.DataSource = DT

Catch ex As Exception
MsgBox("CONSULTA NO REALIZADA DEBIDO A: " & ex.Message, MsgBoxStyle.Critical, "PROGRAMA PROBANDO")

End Try
MICON.Close()
End Sub

Las Conexiones están bien.
El error lo da en esta linea: OBJ.OPERACIONdatos(CmbRefCaja, SQL4)

Alguna solución???
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar