<serializable()> _ Public Class benchPortalPara Public name As String = "" Public attribute As String = "" Public time As Double = 0.0 Public CmdCnt As Integer = 0 'ToDo: to remove <(XmlArrayItem(Type:=GetType(benchPortalPara)), _ 'XmlArrayItem(Type:=GetType(CLS_BENCH_CMD_ALARM))> _ 'Public benchList As ArrayList = New ArrayList <XmlArrayItem(Type:=GetType(benchPortalPara))> _ Public benchList As ArrayList Public Shared Instance As benchPortalPara = Nothing Public Shared Sub passCmdData(ByVal Cls_Cmd As CLS_BENCH_CMD_TIMING) If (Instance Is Nothing) Then Instance = New benchPortalPara End If Instance.name = Cls_Cmd.cmdName Instance.attribute = Cls_Cmd.cmdDescription Instance.time = Cls_Cmd.duration Instance.CmdCnt += 1 If (Instance.benchList Is Nothing) Then Instance.benchList = New ArrayList() Instance.benchList.Add(Instance) End Sub End Class
If (Me.benchList Is Nothing) Then Me.benchList = New ArrayList() Me.benchList.Add(Instance)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)