Visual Basic - Funcion que no devuelve nada

Hola Tengo un modulo con la siguuiente inf.

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Public Function conecta(x As String) As String
'Dim x As String
Dim path As String
path = GetPrivateProfileString("RUTA", "Servidor", "", est, Len(est), "Config.ini")
End Function




Y en el form1, cuando se carga quiero llamar al modulo es cuestion y que me de la ruta del servidor sql que en el caso del modulo es Path, pero
no me aclaro, alguien me puede echar un cable.
como se llama a la funcion que esta en un modulo

conecta(y que pongo aqui)

Esto es porque la aplicacion pueda correr en distintos pc y con la bd de sql en un servidor..
Gracias

Yo creo que el problema esta en que declaras x como string y nunca la usas dentro de la funcion , ese seria el parametro que le pasarias cuando la llamas desde el modulo , cosa que no estas haciendo

modulo :

Public Function sumar(valor1 As Integer, valor2 As Integer) As Integer
sumar = valor1 + valor2
End Function

Form :

Text1.Text = sumar(10, 15)

contesta vos entonces , y con ejemplos