Private Sub LimitedCheckedListBox_ItemCheck(ByVal sender As Object, ByVal e As System.Windows.Forms.ItemCheckEventArgs) Handles MyBase.ItemCheck

        If (Me.CheckedItems.Count >= mnMaxSelectedItems) _
            And (e.NewValue - CheckState.Checked) Then
            RaiseEvent MaxItemsExceeded(mnMaxSelectedItems)

-----> shows the comparison of Me.CheckedItems.Count with nmMaxSelectedItems as an error: "Option Strict On disallows implicit conversions from 'Boolean' to 'Integer'.

What gives?

Never mind. I see in the statement (e.NewValue - CheckState.Checked) should be an = sign.

Programmer going blind...

Although I did get the same implicit conversion problem on p.448

'Finally, set the default value to a variable to use
nHoldDefault = myAttribute.Value

since nHoldDefault is an Integer and myAttribute.Value is System.object

Cleared it up with CInt, but doesn't indicate that in the book.