最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
.NET中自己构建一个ArrDictionary
时间：2022-07-02 10:54:58 编辑：袖梨 来源：一聚教程网
以下是ArrDictionary类：
Public Class ArrDictionary
Private objCollection As New Collection
Private objDic As New DictionaryEntry
Private strKey， strValue As String
Public i As Integer
Public Function Item(ByVal Index As Integer) As Object
Try
Item = objCollection.Item(Index)
Catch ex As Exception
Item = "错误，无此项！"
End Try
End Function
Public Function Item(ByVal Key As String) As Object
Try
Item = objCollection.Item(Key)
Catch ex As Exception
Item = "错误，无此项！"
End Try
End Function
Public Sub Add(ByVal Key As String， ByVal Value As String)
objDic.Key = Key
objDic.Value = Value
objCollection.Add(objDic， objDic.Key)
i += 1
End Sub
Protected Overrides Sub Finalize()
Public Class ArrDictionary
Private objCollection As New Collection
Private objDic As New DictionaryEntry
Private strKey， strValue As String
Public i As Integer
Public Function Item(ByVal Index As Integer) As Object
Try
Item = objCollection.Item(Index)
Catch ex As Exception
Item = "错误，无此项！"
End Try
End Function
Public Function Item(ByVal Key As String) As Object
Try
Item = objCollection.Item(Key)
Catch ex As Exception
Item = "错误，无此项！"
End Try
End Function
Public Sub Add(ByVal Key As String， ByVal Value As String)
objDic.Key = Key
objDic.Value = Value
objCollection.Add(objDic， objDic.Key)
i += 1
End Sub
Protected Overrides Sub Finalize()
相关文章
- 王者荣耀星之破晓先遣测试停服 12-04
- 光遇12.4大蜡烛在哪里 光遇12月4日大蜡烛位置攻略 12-04
- 无限暖暖公测兑换码有哪些 无限暖暖公测版本兑换码介绍 12-04
- 绝区零当三明治来敲门怎么玩 绝区零当三明治来敲门活动介绍 12-04
- 奇迹暖暖绮彩木马搭配攻略 奇迹暖暖绮彩木马过关攻略 12-04
- 光遇12.4每日任务怎么做 光遇12月4日每日任务做法攻略 12-04