private string GenerateVBBusinessLogicClass(string strTemplate, string strTableName, DataTable dtColumns)
{
DataTable dtTargetColumns = new DataTable();
CodeGeneration objCodeGen = new CodeGeneration();
dtTargetColumns = objCodeGen.GetTargetColumnsList(dtColumns);
strTemplate = strTemplate.Replace("__TableName", strTableName);
strTemplate = strTemplate.Replace("__PK", strPrimaryKey);
string strObjectPropertiesList = objCodeGen.GenerateObjectPopertyList(strTableName, dtTargetColumns);
strTemplate = strTemplate.Replace("__ObjectPropertiesList", strObjectPropertiesList);
return(strTemplate);
}