Lines Matching refs:errMsg

15         Dim errMsg As String = ""
21 …   errMsg = errMsg & "#A1 Case statement not working with Select Expression of type byte " & vbCrLf
26 …    errMsg = errMsg & "#A1 Case statement not working with Select Expression of type byte" & vbCrLf
32 …   errMsg = errMsg & "#A2 Case statement not working with Select Expression of type Short" & vbCrLf
34 …   errMsg = errMsg & "#A2 Case statement not working with Select Expression of type Short" & vbCrLf
43 … errMsg = errMsg & "#A3 Case statement not working with Select Expression of type Integer" & vbCrLf
45 … errMsg = errMsg & "#A3 Case statement not working with Select Expression of type Integer" & vbCrLf
51 …    errMsg = errMsg & "#A4 Case statement not working with Select Expression of type Long" & vbCrLf
60 … errMsg = errMsg & "#A5 Case statement not working with Select Expression of type Decimal" & vbCrLf
72 …  errMsg = errMsg & "#A6 Case statement not working with Select Expression of type Single" & vbCrLf
78 …  errMsg = errMsg & "#A7 Case statement not working with Select Expression of type double" & vbCrLf
90 …  errMsg = errMsg & "#A8 Case statement not working with Select Expression of type String" & vbCrLf
99 …    errMsg = errMsg & "#A9 Case statement not working with Select Expression of type Char" & vbCrLf
108 … errMsg = errMsg & "#A10 Case statement not working with Select Expression of type Object" & vbCrLf
114 …errMsg = errMsg & "#A11 Case statement not working with Select Expression of type DateTime" & vbCr…
119 …errMsg = errMsg & "#A11 Case statement not working with Select Expression of type DateTime" & vbCr…
122         If (errMsg <> "") Then
123             Throw New Exception(errMsg)