最新下载
热门教程
- 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
相关文章
- 医学考试网官网入口-2026医考成绩查询通道 03-26
- 秘塔搜索网页版入口在哪里 03-26
- 妖精动漫网页版一键登录-妖精动漫官网极速入口 03-26
- 高德地图怎么开启省电模式 03-26
- 即梦官网入口网页版-即梦AI官网登录入口 03-26
- 漫蛙app官方正版漫画在线入口在哪 03-26