Ya. El problema es simple: no abres la Base de datos, por tanto los DataSource no la encuentran.
Si añades esto al formulario FMenu, por ejemplo (o al fMain, aunque en tu ejemplo no lo utilices para nada,Mejor establece fMenu como clase de inicio):
Código:
Public Sub Form_Open()
Dim hCon As Connection
hCon = Connections["Connection1"]
If hcon.opened Then hCon.Close()
hcon.Type = "Sqlite3"
hcon.Host = Application.Path
hcon.Name = "LIBROS_DB"
hcon.Open()
End
Funciona perfectamente. Tan sólo recuerda que Application.Path sólo funciona cuando ejecutes el program desde el IDE. Si lo ejecutas con ese path una vez compilado o instado desde un paquete, no te funcionará. Lo mejor es en la primera ejecución del programa copiarlo a una carpeta "Normal" y establecer luego el hcon.Host dirigido a ella.
Saludos.