最新下载
热门教程
- 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
相关文章
- 学信网官方登录入口-个人学历学位认证查询系统 12-20
- 原神AKT资源站网页入口-AKT原神官网链接直达地址 12-20
- CET4准考证成绩防伪验证官方入口-CET4准考证成绩下载快速指南入口 12-20
- yandex网站突然打不开-俄罗斯搜索引擎最新可用入口2025 12-20
- cet4成绩快速查询入口-cet4成绩官方查询入口官网 12-20
- 抖币充值官网入口-抖币充值官网入口1:10 12-20