主题：请教代码词典有关问题

Dim zd As New Dictionary(Of String,String)
zd.Add("bs","博士")
zd.Add("ss","硕士")
zd.Add("bk","本科")
zd.Add("dz","大专")
zd.Add("gz","高中")
For Each bm As String In zd.Keys
    Output.Show(bm )
Next