最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
用vb.net开发api viewer(4)
时间：2022-07-02 11:38:07 编辑：袖梨 来源：一聚教程网
在项目中添加新项---类（CTypes.vb）
代码如下
Namespace API
Public Class CTypes
Implements IStore
Dim TypeList As SortedList
Dim TypeListCSharp As SortedList
Sub New()
TypeList = New SortedList()
TypeListCSharp = New SortedList()
End Sub
Sub Add(ByVal Key As String, ByVal Data As String, Optional ByVal bCSharp As Boolean = False) Implements IStore.Add
If Not bCSharp Then
If Not TypeList.ContainsKey(Key) Then
TypeList.Add(Key, Data)
End If
Else
If Not TypeListCSharp.ContainsKey(Key) Then
TypeListCSharp.Add(Key, Data)
End If
End If
End Sub
代码如下
Namespace API
Public Class CTypes
Implements IStore
Dim TypeList As SortedList
Dim TypeListCSharp As SortedList
Sub New()
TypeList = New SortedList()
TypeListCSharp = New SortedList()
End Sub
Sub Add(ByVal Key As String, ByVal Data As String, Optional ByVal bCSharp As Boolean = False) Implements IStore.Add
If Not bCSharp Then
If Not TypeList.ContainsKey(Key) Then
TypeList.Add(Key, Data)
End If
Else
If Not TypeListCSharp.ContainsKey(Key) Then
TypeListCSharp.Add(Key, Data)
End If
End If
End Sub
相关文章
- 地下城堡4骑士与破碎编年史初光神官有哪些流派 09-17
- 嘟嘟脸恶作剧克萝伊技能怎么样 09-17
- 新三国志曹操传驯马场有什么玩法 09-17
- 全境封锁曙光武器怎么获取 09-17
- 鹅鸭杀丧葬者如何玩 09-17
- 剑与远征启程沙利叶强技能怎么样 09-17