Dovrebbe essere qualcosa del genere...
Dim queryCommand As IDbCommand
queryCommand = DataManager.NewCommand
CommandComposer(queryCommand, "exec sp_tua ", "parWhere", DbType.Int32, valPar)
Dim dataAdapter As IDbDataAdapter = DataManager.NewDataAdapter
dataAdapter.SelectCommand = queryCommand
Me.FillData(dataAdapter, "nome", dsData)