Hola, yo creo que el error está en que no le pasas a la función la ruta del archivo.
Suponemos que el archivo .ini está en el mismo directorio que la aplicación:
Código vb:
Ver originalDim FileIni As String
FileIni = App.Path & "\Config.ini"
Servidor = INI_Read(FileIni, "Conexion", "Servidor")
BaseDatos = INI_Read(FileIni, "Conexion", "BaseDatos")
Login = INI_Read(FileIni, "Conexion", "Login")
Password = INI_Read(FileIni, "Conexion", "Password")