主题：怎么把字符串转成Dictionary

读写字符串，参考

字符串可以这样处理，如

Dim str as string = "1,苹果;2,李子;3,榴莲"
Dim dic As new Dictionary(Of String, String)
For Each s As String In str.split(";")
    Dim ary() = s.split(",")
    dic.Add(ary(0), ary(1))
Next