尝试使用StringBuilder.AppendFormat
而不是Printf.bprintf
.当我在你的问题的例子中做出这个改变时,我看到了巨大的性能提升(~80x).
evaluations |> Seq.iter (fun (e) -> builder.AppendFormat( " ({0}, '{1}', '{2}', {3}, {4}, {5}, {6}), ", e.ID, e.Tag, e.Port, e.Excess, e.Return, (e.StartDate.ToString("MM/dd/yyyy")), (e.EndDate.ToString("MM/dd/yyyy")) ) |> ignore )