Исходный текст

//---------------------------------------------------------
// Выполняет глобальную выборку
//---------------------------------------------------------

// получить глобальные выборки
CComPtr<ITDMSQueries> pQueries;
CheckError(pApp->get_Queries(&pQueries));

// получить выборку
CComPtr<ITDMSQuery> pQuery;
// по номеру
VARIANT var;
var.vt = VT_I4;
var.lVal = 0;
CheckError(pQueries->get_Item(var, &pQuery));
// по имени
//VARIANT var;
//var.vt = VT_BSTR;
//var.bstrVal = A2BSTR("Квартиры");
//CheckError(pQueries->get_Item(var, &pQuery));
//VariantClear(&var);

// запустить выборку и получить объекты
CComPtr<ITDMSObjects> pObjects;
CheckError(pQuery->get_Objects(&pObjects));
long lCount;
CheckError(pObjects->get_Count(&lCount));

char sMsg[256];
sprintf(sMsg, "Выбрано %d объектов", lCount);
MessageBox(NULL, sMsg, "TDMS Example", MB_OK | MB_ICONINFORMATION);