Foxtable(狐表)用户栏目专家坐堂 → 怎么把字符串转成Dictionary


  共有1732人关注过本帖树形打印复制链接

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

帅哥哟,离线,有人找我吗?
夜散点炽
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:74 积分:682 威望:0 精华:0 注册:2018/3/5 14:34:00
怎么把字符串转成Dictionary  发帖心情 Post By:2018/3/5 14:40:00 [只看该作者]

想在本地写一个文本文档放一些地址的键值对字符串,
然后通过代码读出这个文件中的字符串转成Dictionary,再设置给
Tables("表名").Cols("字段名").CodeDictionary

大神给指点一下,新手啊

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/5 14:50:00 [只看该作者]

读写字符串,参考

 

ReadAllText 读取文本文件的内容
WriteAllText 向文本文件中写入内容

 

字符串可以这样处理,如

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
夜散点炽
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:74 积分:682 威望:0 精华:0 注册:2018/3/5 14:34:00
  发帖心情 Post By:2018/3/5 15:39:00 [只看该作者]

谢谢哈

 回到顶部