.NET (Core and Framework)

...
com = New System.IO.Ports.SerialPort()
...
AddHandler com.ErrorReceived, AddressOf ErrorReceived
...

Private Sub ErrorReceived(ByVal sender As Object, ByVal e As SerialErrorReceivedEventArgs)

  MessageBox.Show(e.EventType.ToString)

End Sub

'VB Example:
If FirstName.Length > 5 And FirstName(5) = "f"c Then
    'This will break for lack of short circuiting
End If

//C# Example:
if (FirstName.Length > 5 & FirstName(5) == 'f') {
    //This will break for lack of short circuiting
}

'VB Example:
If CaseClass.ParseCase(Data) And ClientClass.ParseClient(Data) And CourtClass.ParseCourt(Data) Then
    'Do Something
End If

//C# Example:
If (CaseClass.ParseCase(Data) & ClientClass.ParseClient(Data) & CourtClass.ParseCourt(Data)){
    //Do Something
}

'VB Example:
Call CaseClass.ParseCase(Data)
Call ClientClass.ParseClient(Data)
Call CourtClass.ParseCourt(Data)

If CaseClass.Success AndAlso ClientClass.Success AndAlso CourtClass.Success Then
    'Do Something
End If

//C# Example:
CaseClass.ParseCase(System.Data);
ClientClass.ParseClient(System.Data);
CourtClass.ParseCourt(System.Data);

if (CaseClass.Success && ClientClass.Success && CourtClass.Success) {
    //Do Something
}

'VB-Only Example:
Dim intTest As Integer = 0
Dim blnLMAO As Boolean = IIF(2=2, Integer.TryParse("3", intTest), Integer.TryParse("4", intTest))