vc declarou a variavel retorno em qual local ?

talvez o problema esteja nisto.

Apesar da simplicidade, eu uso este a classe de conexão, da seguinte forma, confirme se for a mesma lógica:
Imports System.Data.SqlClient
Imports System.Windows.Forms
Public Class cldBancoDados
    Dim StringConexao As String = [Ô]Server=Servidor;Database=\\168.14.184.250;user id=usuario;pwd=senha[Ô]
    Private Function AbreBanco() As SqlConnection
        Dim Conn As New SqlConnection
        With Conn
            .ConnectionString = StringConexao
            .Open()
        End With
        Return Conn
    End Function
    Private Sub FechaBanco(ByVal Conn As SqlConnection)
        If Conn.State = ConnectionState.Open Then
            Conn.Close()
        End If
    End Sub
    Public Sub ExecutaComando(ByVal strQuery As String)
        Dim Conn As New SqlConnection
        Try
            Conn = AbreBanco()
            Dim cmdComando As New SqlCommand
            With cmdComando
                .CommandText = strQuery
                .CommandType = CommandType.Text
                .Connection = Conn
                .ExecuteNonQuery()
            End With
        Catch ex As Exception
            Throw ex
        Finally
        End Try
    End Sub
    Public Function RetornaDataSet(ByVal strQuery As String) As DataSet
        Dim Conn As New SqlConnection
        Try
            Conn = AbreBanco()
            Dim cmdComando As New SqlCommand
            With cmdComando
                .CommandText = strQuery
                .CommandType = CommandType.Text
                .Connection = Conn
            End With
            Dim daAdaptador As New SqlDataAdapter
            Dim dsDataSet As New DataSet
            daAdaptador.SelectCommand = cmdComando
            daAdaptador.Fill(dsDataSet)
            Return dsDataSet
        Catch ex As Exception
            Throw New Exception([Ô]Erro na camada 3:[Ô] & ex.Message)
        Finally
            FechaBanco(Conn)
        End Try
    End Function
    Public Function RetornaDataReader(ByVal strQuery As String) As SqlDataReader
        Dim Conn As New SqlConnection
        Try
            Conn = AbreBanco()
            Dim cmdComando As New SqlCommand
            With cmdComando
                .CommandText = strQuery
                .CommandType = CommandType.Text
                .Connection = Conn
            End With
            Return cmdComando.ExecuteReader
        Catch ex As Exception
            Throw ex
        End Try
    End Function
End Class

Eu já deixei o seu numero do servidor, para facilitar para vc entender, tente comparar este script com o q vc tem... Este funciona perfeitamente nos projetos q desenvolvo, espero ter ajudado... Se persistir a duvida, pode chamar, se quiser, eu posso te mandar também uma apostila q me ajudou a entender este script...

VB.NET + SQL Server = Muita coisa sei, mas muita coisa para aprender.
Curso de Excel e VB6 www.cursoexcelvba.com.br
Blog do Mouser

Mouser, sua linha de conexao está errada:

Dim StringConexao As String = [Ô]Server=Servidor;Database=\\168.14.184.250;user id=usuario;pwd=senha[Ô]

o correto é:

Dim StringConexao As String = [Ô]Server=168.14.184.250;Database=NomeBD;user id=usuario;pwd=senha[Ô]

até ai, blz, mas gostaria de poder obter a conexao direto do app.config, por isso volto aqui novamente.




O conhecimento é como o dinheiro: quanto mais temos, mais queremos ter (Josh Billings)  

Pessoal, seguinte, desisti de usar o app. config, vou criar um arquivo ini e nele colocar a conexão ou então deixar no proprio código, devido aos problemas quanto à possivel alteração do config, mesmo assim, obrigado.



O conhecimento é como o dinheiro: quanto mais temos, mais queremos ter (Josh Billings)