Necesito ayuda para manipular dll

Muy buenas noches quisiera saber como podría manipular un función que esta en un librería en un proyecto
la función en la siguiente----esta en una librería
Public Sub Generar()
Dim dacodigo As New SqlDataAdapter
Dim prmcodigo As SqlParameter
dacodigo.SelectCommand = New SqlCommand
With dacodigo.SelectCommand
.Connection = cn
.CommandType = CommandType.StoredProcedure
.CommandText = "sp_cod_autogenerado"
End With
Try
prmcodigo = New SqlParameter("@codalu", SqlDbType.Char, 10)
prmcodigo.Direction = ParameterDirection.Output
dacodigo.SelectCommand.Parameters.Add(prmcodigo)
cn.Open()
dacodigo.SelectCommand.ExecuteNonQuery()
cn.Close()
COD = dacodigo.SelectCommand.Parameters("@codalu").Value
Catch ex As Exception
End Try
End Sub
Pues en mi proyecto también tengo un modulo------en el cual llamo a la función y nada
a verdad en mi modulo eh declarado una variable Public objing As New ClassVideo.ClassVid
Public Sub genera_codigo()
With frmingreso
objing.Generar(.txtcodi.Text)
.txtcodi.Text = objing.COD
End With
End Sub
ps en mi formaulario lo llamo a la funcion de mi modulo y nada no genera el codigo
Call genera_codigo()