vb.net使用Newtonsoft.Json读取Json文件

环境: VS2017社区版
目的: 读取json的key作为combobox的选项,并把对应的value写入textbox
json文件命名为Dm.json, 存放在debug路径

{
   
	"A":1,
	"B":2,
	"C":3
}

1. 下载Newtonsoft.Json. (官方地址:https://www.newtonsoft.com/json)
可以直接通过VS 2017进行下载并引用
1.1 右击引用,选择"管理NuGet程序包"

1.2 在浏览里面搜索Json,选择下载即可
2. Dm类,用以读取以及维护json文件

Imports System.IO
'导入Newtonsoft.Json
Imports Newtonsoft.Json
Imports Newtonsoft.Json.Linq

Public Class Dm

    Private dm_dict As Hashtable = New Hashtable()

    '构造函数
    Public Sub New()
        ReadJson()
    End Sub

    '属性dm_dict的getter与setter
    Public Property Dm_dict1 As Hashtable
        Get