cargar datos de un datagridview vb.net

[Aquaventus]

Tu clase conexion anda mal, tu clase no puede ser un método, lo que deberias hacer es instanciar tu clase, y luego llamar aun método que retorne un ODBCConnection :

Código vb:

Public Class conexion
 
    Public Reader As Odbc.OdbcDataReader
    Public conec As New Data.Odbc.OdbcConnection
    Public comando As New Odbc.OdbcCommand
    Public conec2 As New Odbc.OdbcConnection
    Dim uid, pwd As String
 
    Public Funtion conectar(ByVal uid As String, ByVal pwd As String) As Odbc.OdbcConnection
            If conec.State = ConnectionState.Closed Then
                conec.ConnectionString = "DSN=sqlvc;Uid=" & uid & ";pwd=" & pwd & ";"
                conec.Open()
            End If
            return conec
    End Sub
 

Código vb:

Module ValGlobal
 
    Public query As String
    Public query2 As String
    Public conec As New Conexion
    Public ds As DataSet
    Public dt As DataTable
    Public dr As Odbc.OdbcDataReader
    Public da As Odbc.OdbcDataAdapter
    Public cmd As Odbc.OdbcCommand
 
End Module
 

Código vb:

query = "SELECT * FROM articulos where codigo='" & cbbuscar.Text & "'"
            cmd.Connection = conec.conectar("root", "")
            cmd.CommandText = "SELECT * FROM articulos where codigo='" & cbbuscar.Text & "'"
            cmd.CommandType = CommandType.Text
            da.SelectCommand = cmd
            dt = New DataTable
                da = New Odbc.OdbcDataAdapter(cmd)
                da.Fill(dt)
                dgv.DataSource = dt
                With (dgv)
                    .MultiSelect = False
                    .SelectionMode = DataGridViewSelectionMode.FullRowSelect
                    .DataSource = dgv.DataSource
                End With
 

Prueba y nos comentas. Saludos!.