Here you are for the C# version.
using System.Collections.Generic;
using System.Text;
public static class DictionaryExtensions
{
public static string Dump<T, U>(this IDictionary<T, IList<U>> dictionary)
{
StringBuilder builder = new StringBuilder();
string newline = Environment.NewLine;
int length = newline.Length;
foreach (var pair in dictionary)
{
builder.AppendFormat
(
"{0} > {1}",
pair.Key,
string.Join(",", pair.Value)
);
builder.Append(Environment.NewLine);
}
builder.Remove(builder.Length - length, length);
return builder.ToString();
}
}
Usage:
Dim strSutun2 As String = DicInt.Dump()
Hope this helps.