CString sql; 
sql.Format("SELECT 项目表.项目名+子项目表.子项目名 AS 上级项目 FROM 项目表,子项目表 WHERE 子项目表.项目编号=项目表.项目编号"); 
_bstr_t bsql = (LPCTSTR)sql; 
pRec = pCon->Execute( bsql, &vRecordsAffected, 0 ); 
pfldPrjname = pRec->Fields->Item["上级项目"]; 
vPrjname.Clear(); 
while (!pRec->adoEOF) 
{
 vPrjname = pfldPrjname->Value;
 m_ControlCPrj.AddString((char*)_bstr_t(vPrjname));
 pRec->MoveNext(); 
} 程序乱掉了,重排一下。