The Weird and The Wonderful

Dim strBrowser As String = Request.Browser.Browser.ToString()
Dim strBroswerVersion As String = Request.Browser.Version.ToString()
If strBrowser.ToString() = "IE" Then
    If IsNumeric(strBroswerVersion.ToString()) Then
        If strBroswerVersion < 9 Then
            ' Do absolutely nothing. Really, nothing at all.
        End If
    End If
End If

• Generally, you should avoid checking browser versions, especially in server-side code (I believe the reasoning is that older browsers are slower, so some value was changed).
• Compilation breaks when trying to compare a string against a number.
• Anything this would have done has been commented out, so it does nothing.
• Calling ToString on a string (which I think might even throw a null reference exception if the original string is null)... four times.
• Comparing strings without ignoring case.
• The commented out code (not shown) would have caused a compiler error too (attempt to divide a string by a number).
• Hungarian notation.

typedef short VARIANT_BOOL;
#define VARIANT_TRUE ((VARIANT_BOOL)-1)
#define VARIANT_FALSE ((VARIANT_BOOL)0)