Just came across this problem as well. Got round it by using the Fill AND Line Visible properties like this:

shp.Fill.Visible = (chkShow(CHK_SHOW_DIRECTION).Value = vbUnchecked)
shp.Line.Visible = Not shp.Fill.Visible

The value of the check box determines the visibility of the line shape.

M.