二维码有好几种格式组合,
比如下面这4种。
SN,MAC,H/W
SN,H/W
SN,MAC
MAC,H/W
在datacolchanging,如何用select case来处理这4种情况?都用if ,会顺序执行,会重复。
If e.DataCol.Name = "SN" Then
Dim str As String = e.NewValue
If str.Contains("SN:") And str.Contains("MAC:") And str.Contains("H/W:") Then
Dim idx1 As Integer = str.IndexOf("MAC:")
Dim idx2 As Integer = str.IndexOf("H/W:")
e.DataRow("MAC") = str.substring(idx1+4, idx2-idx1-5)
e.DataRow("HW") = str.substring(idx2+5)
e.NewValue = str.SubString(3, idx1-3)
End If
End If