12 lines
307 B
VB.net
12 lines
307 B
VB.net
|
Public Class XWormTask
|
||
|
|
Public msgPack As Byte()
|
||
|
|
Public id As String
|
||
|
|
Public doneClient As List(Of String)
|
||
|
|
|
||
|
|
Public Sub New(ByVal _msgPack As Byte(), ByVal _id As String)
|
||
|
|
msgPack = _msgPack
|
||
|
|
id = _id
|
||
|
|
doneClient = New List(Of String)()
|
||
|
|
End Sub
|
||
|
|
End Class
|