private void ConstructBody()
        {
            VBBlock usingBlock     = new VBBlock(VBBlockStatement.Using, "Using sqlCommand As New SqlCommand()");
            string  sqlString      = $"{Quotes}{SqlDeleteBuilder.DeleteByPrimaryKey(datatable)}{Quotes}";
            string  parameterName  = string.Empty;
            string  parameterValue = string.Empty;

            usingBlock.Statements.Add($"sqlCommand.CommandText = {sqlString}");

            foreach (DataColumn clm in this.datatable.PrimaryKey)
            {
                parameterName  = $"{Quotes}@{clm.ColumnName}{Quotes}";
                parameterValue = GetParameterValue(clm);

                usingBlock.Statements.Add($"sqlCommand.Parameters.AddWithValue({parameterName}, {parameterValue})");
            }

            usingBlock.Statements.Add($"table.DbAccess.Commands.Add(sqlCommand)");

            this.Statements.Add(usingBlock.ToString());
        }